Share via


GroupShapes オブジェクト (Word)

グループ化された図形の中の各図形を表します。 図形のグループに含まれる各図形は、 Shape オブジェクトによって表されます。

注釈

GroupShapes コレクションを取得するには、GroupItems プロパティを使用します。 GroupItems (Index) を使用して、グループ化された図形内の個々の図形の番号を指定して、GroupShapes コレクションから 1 つの図形を返します。 次の使用例は、作業中の文書に 3 つの三角形を追加し、それらをグループ化し、グループ全体に色を設定し、2 番目の三角形の色だけを変更します。

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

関連項目

Word オブジェクト モデル リファレンス

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。