PowerPoint) (ShapeRange.GroupItems 屬性
會傳回代表指定之群組中的個別圖形的 GroupShapes 物件。 使用 GroupShapes 物件的 Item 方法可傳回單一圖案從群組中。 唯讀。
語法
expression。 GroupItems
表達 代表 ShapeRange 物件的 變數。
傳回值
GroupShapes
範例
本範例會將三個三角形新增至 myDocument、將它們分組、設定整個群組的色彩,然後只變更第二個三角形的色彩。
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
.AddShape(msoShapeIsoscelesTriangle, 10, _
10, 100, 100).Name = "shpOne"
.AddShape(msoShapeIsoscelesTriangle, 150, _
10, 100, 100).Name = "shpTwo"
.AddShape(msoShapeIsoscelesTriangle, 300, _
10, 100, 100).Name = "shpThree"
With .Range(Array("shpOne", "shpTwo", "shpThree")).Group
.Fill.PresetTextured msoTextureBlueTissuePaper
.GroupItems(2).Fill.PresetTextured msoTextureGreenMarble
End With
End With
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。