Shapes-Objekt (Herausgeber)

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 Shapes in einem Dokument arbeiten möchten, z. B. nur mit den AutoShapes im Dokument oder nur mit den ausgewählten Shapes, müssen Sie eine ShapeRange-Auflistung erstellen, die die Shapes enthält, mit denen Sie arbeiten möchten.

Hinweise

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

Hinweis

Wenn Sie für alle Shapes in einer Publikation gleichzeitig eine Aktion ausführen (z. B. löschen oder eine Eigenschaft festlegen) möchten, 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.

  • Last updated on