ShapeRange.Ungroup (Word)

Aufheben der Gruppierung aller gruppierten Formen im angegebenen Formenbereich, disassemblieren von Bildern und OLE-Objekten innerhalb der angegebenen Form oder des Formenbereichs und Zurückgeben der nicht gruppierten Formen als einzelnes ShapeRange -Objekt.

Da eine Gruppe von Formen als ein einzelnes Objekt behandelt wird, ändern sich durch das Gruppieren und Aufheben der Gruppierung von Formen die Anzahl der Elemente in der Shapes-Auflistung und die Indexnummern von Elementen, die nach den Formen mit der aufgehobenen Gruppierung in der Auflistung stehen.

Dim sre As ShapeRange: Set sre =  
Dim sreUngroup As ShapeRange
Set sreUngroup = sre.Ungroup()