GroupShapes 对象 (Word)
代表组合形状中的单个形状。 一组形状中包含的每个形状都由 Shape 对象表示。
备注
使用 GroupItems 属性可返回 GroupShapes 集合。 使用 GroupItems (Index) ,其中 Index 是分组形状中单个形状的编号,可从 GroupShapes 集合返回单个形状。 以下示例向活动文档添加三个三角形,并加以组合,为整个组合设置一种颜色,然后只更改第二个三角形的颜色。
With ActiveDocument.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 支持和反馈,获取有关如何接收支持和提供反馈的指南。