VBA-Programmierung in Microsoft Excel

VBA-Begriff: Beispiel zur Group-Methode (ShapeRange-Objekt)

In diesem Beispiel werden in myDocument zwei Formen eingefügt und gruppiert. Die Gruppe wird mit einer Füllung versehen, gedreht und in der Zeichnungsebene nach hinten gelegt.

Set myDocument = Worksheets(1)
With myDocument.Shapes
    .AddShape(msoShapeCan, 50, 10, 100, 200).Name = "shpOne"
    .AddShape(msoShapeCube, 150, 250, 100, 200).Name = "shpTwo"
    With .Range(Array("shpOne", "shpTwo")).Group
        .Fill.PresetTextured msoTextureBlueTissuePaper
        .Rotation = 45
        .ZOrder msoSendToBack
    End With
End With