GroupShapes オブジェクト (PowerPoint)

グループ化された図形の中の各図形を表します。 各図形は、 Shape オブジェクトで表されます。 このオブジェクトで Item メソッドを使用すると、グループを解除せずにグループ内のそれぞれの図形を処理できます。

例

GroupItems プロパティを使用して、GroupShapes コレクションを返します。 GroupItems コレクションから単一の図形を取得するには、GroupItems (index) を使用します。ここで、indexはグループ化された図形内の個々の図形の数です。 次の使用例では、myDocument に 3 つの三角形を追加し、それらをグループ化し、グループ全体に色を設定した後、2 番目の三角形の色だけを変更します。

Set myDocument = ActivePresentation.Slides(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

関連項目

PowerPoint Object Model Reference

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

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

  • Last updated on