Shape.Ungroup メソッド (Word)

指定した図形に含まれるグループ化された任意の図形のグループを解除します。

構文

式。解除

expression 必須です。 Shape オブジェクトを表す変数を指定します。

戻り値

ShapeRange

注釈

このメソッドは、指定した図形に含まれる図または OLE オブジェクトを分解し、グループを解除した図形を 1 つの ShapeRange オブジェクトとして返します。

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

例

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

Set myDocument = ActiveDocument 
For Each s In myDocument.Shapes 
 s.Ungroup 
Next

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

Set myDocument = ActiveDocument 
For Each s In myDocument.Shapes 
 If s.Type = msoGroup Then s.Ungroup 
Next

関連項目

Shape オブジェクト

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

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