VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

VBA-Begriff: Beispiel zur Ungroup-Methode (Shape- oder ShapeRange-Objekt)

In diesem Beispiel werden in myDocument alle Formengruppen aufgehoben und alle Bilder oder OLE-Objekte zerlegt.

Set myDocument = Worksheets(1)
For Each s In myDocument.Shapes
    s.Ungroup
Next

In diesem Beispiel werden in myDocument alle Formengruppen aufgehoben, ohne Bilder oder OLE-Objekte zu zerlegen.

Set myDocument = Worksheets(1)
For Each s In myDocument.Shapes
    If s.Type = msoGroup Then s.Ungroup
Next