GroupShapes-Objekt (Publisher)
Stellt die einzelnen Formen innerhalb einer gruppierten Form dar. Jeder Form wird durch ein Shape -Objekt dargestellt. Wenn Sie die Item-Methode mit diesem Objekt verwenden, können Sie mit einzelnen Shapes innerhalb einer Gruppe arbeiten, ohne die Gruppierung aufheben zu müssen.
Hinweise
Verwenden Sie die Shape.GroupItems-Eigenschaft , um eine GroupShapes-Auflistung zurückzugeben. Verwenden Sie GroupItems (Index), wobei index die Nummer der einzelnen Form innerhalb der gruppierten Form ist, um eine einzelne Form aus der GroupShapes-Auflistung zurückzugeben.
Beispiel
Das folgende Beispiel fügt drei Dreiecke zu im aktiven Dokument hinzu, gruppiert sie, legt eine Farbe für die gesamte Gruppe fest und ändert dann nur für das dritte Dreieck die Farbe.
Sub WorkWithGroupShapes()
With ActiveDocument.Pages.Add(Count:=1, After:=1).Shapes
.AddShape(msoShapeIsoscelesTriangle, _
50, 50, 100, 100).Name = "shpOne"
.AddShape(msoShapeIsoscelesTriangle, _
200, 50, 100, 100).Name = "shpTwo"
.AddShape(msoShapeIsoscelesTriangle, _
350, 50, 100, 100).Name = "shpThree"
With .Range(Array("shpOne", "shpTwo", "shpThree")).Group
.Fill.PresetTextured PresetTexture:=msoTextureBlueTissuePaper
.GroupItems(3).Fill.PresetTextured _
PresetTexture:=msoTextureGreenMarble
End With
End With
End Sub
Methoden
Eigenschaften
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.