GroupShapes オブジェクト (Excel)
グループ化した図形を表します。
注釈
各図形は、 Shape オブジェクトで表されます。 このオブジェクトで Item メソッドを使用すると、それらの図形のグループ化を解除しなくても、グループ内の図形に個別に設定することができます。
例
GroupShapes コレクションを取得するには、Shape オブジェクトの GroupItems プロパティを使用します。
GroupItems (index) を使用して、グループ化された図形内の個々の図形の数を index にして、GroupShapes コレクションから 1 つの図形を返します。
次の使用例では、myDocument に 3 つの三角形を追加し、それらをグループ化し、グループ全体に色を設定した後、2 番目の三角形の色だけを変更します。
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 のサポートおよびフィードバックを参照してください。