Shapes-Objekt (Publisher)

Eine Auflistung von Shape -Objekten, die alle Formen auf einer Seite einer Publikation darstellen. Jedes Shape -Objekt stellt ein Objekt in der Zeichnungsebene, wie beispielsweise eine AutoForm, Freihandform, OLE-Objekt oder Bild dar.

Hinweis

Wenn Sie mit einer Teilmenge der Formen in einem Dokument arbeiten möchten, z. B. um nur die AutoFormen im Dokument oder nur die ausgewählten Formen zu verwenden, müssen Sie eine ShapeRange-Auflistung erstellen, die die Shapes enthält, mit denen Sie arbeiten möchten.

HinwBemerkungeneise

Verwenden Sie die Page.Shapes-Eigenschaft , um die Shapes-Auflistung zurückzugeben. Verwenden Sie Shapes (Index), wobei index die Indexnummer ist, um ein einzelnes Shape-Objekt zurückzugeben.

Hinweis

Wenn Sie alle Shapes in einer Publikation gleichzeitig verwenden möchten (z. B. löschen oder eine Eigenschaft festlegen), verwenden Sie die Range-Methode , um ein ShapeRange-Objekt zu erstellen, das alle Shapes in der Shapes-Auflistung enthält, und wenden Sie dann die entsprechende Eigenschaft oder Methode auf das ShapeRange-Objekt an.

Verwenden Sie eine der folgenden Methoden der Shapes-Auflistung , um einer Publikation eine Form hinzuzufügen und ein Shape-Objekt zurückzugeben, das die neu erstellte Form darstellt:

Beispiel

Das folgende Beispiel wählt alle Formen auf der ersten Seite der aktiven Publikation.

Sub SelectAllShapes() 
    ActiveDocument.Pages(1).Shapes.SelectAll 
End Sub

Im folgenden Beispiel wird der aktiven Publikation eine neue Form hinzugefügt.

Sub AddNewShape() 
    ActiveDocument.Pages(1).Shapes.AddShape Type:=msoShapeFoldedCorner, _ 
        Left:=50, Top:=50, Width:=100, Height:=200 
End Sub

Das folgende Beispiel kippt die Form 1 auf der ersten Seite der aktiven Publikation horizontal.

Sub FlipShape() 
    ActiveDocument.Pages(1).Shapes(1).Flip FlipCmd:=msoFlipHorizontal 
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.