GroupShapes 对象 (Excel)

代表一组形状中的单个形状。

备注

每个形状表示 形状 对象。 使用 项目 方法与此对象,您可以使用组合中的单个形状而不必取消组合。

示例

使用 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。