ShapeRange.Ungroup メソッド (PowerPoint)

指定した図形または図形範囲の図形のグループ化を解除します。 図および OLE オブジェクトを指定した図形または図形範囲内で逆アセンブルします。 グループ化されていない図形を 1 つの ShapeRange オブジェクトとして返します。

構文

式。解除

式ShapeRange オブジェクトを表す変数。

戻り値

ShapeRange

注釈

グループ化された図形は 1 つの図形として扱われるため、図形をグループ化したりグループを解除したりすると、Shapes コレクション内のオブジェクトの数、およびコレクション内の影響を受ける項目の後にある項目のインデックス番号が変わります。

例

次の使用例は、myDocument のすべてグループ化された図形のグループ化を解除し、すべての図または OLE オブジェクトを分解します。

Set myDocument = ActivePresentation.Slides(1)

For Each s In myDocument.Shapes

    s.Ungroup

Next

次の使用例は、myDocument のすべての図形のグループ化を解除しますが、図や OLE オブジェクトは分解しません。

Set myDocument = ActivePresentation.Slides(1)

For Each s In myDocument.Shapes

    If s.Type = msoGroup Then s.Ungroup

Next

関連項目

ShapeRange オブジェクト

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

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