代表一组形状中的单个形状。
备注
每个形状表示 形状 对象。 使用 项目 方法与此对象，您可以使用组合中的单个形状而不必取消组合。
示例
使用 Shape 对象的 GroupItems 属性可返回 GroupShapes 集合。
使用 GroupItems (索引) ，其中 index 是分组形状中各个形状的数目，可以从 GroupShapes 集合返回单个形状。
下例向 myDocument 添加三个三角形，将它们分成一组，设置整个组的颜色，然后只更改第二个三角形的颜色。
Set myDocument = Worksheets(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 支持和反馈，获取有关如何接收支持和提供反馈的指南。