Shapes.AddPolyline-Methode (Word)
Fügt einem Zeichenbereich ein offenes oder ein geschlossenes Vieleck hinzu. Gibt ein Shape-Objekt zurück, welches das Vieleck darstellt, und fügt es der CanvasShapes-Auflistung hinzu.
Syntax
Ausdruck.
AddPolyline( _SafeArrayOfPoints_ )
expression Erforderlich. Eine Variable, die ein Shapes-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| SafeArrayOfPoints | Erforderlich | Variant | Ein Array von Koordinatenpaaren, das die Scheitelpunkte der Polylinie angibt. |
Hinweise
Weisen Sie dem ersten und letzten Scheitelpunkt in der Polylinienzeichnung dieselben Koordinaten zu, um ein geschlossenes Vieleck zu bilden.
Beispiel
In diesem Beispiel wird in einem neuen Zeichenbereich eine V-förmige offene Polylinie erstellt.
Sub NewCanvasPolyline()
Dim docNew As Document
Dim shpCanvas As Shape
Dim sngArray(1 To 3, 1 To 2) As Single
'Creates a new document and adds a drawing canvas
Set docNew = Documents.Add
Set shpCanvas = docNew.Shapes.AddCanvas( _
Left:=100, Top:=75, Width:=200, Height:=300)
'Sets the coordinates of the array
sngArray(1, 1) = 100
sngArray(1, 2) = 75
sngArray(2, 1) = 150
sngArray(2, 2) = 100
sngArray(3, 1) = 100
sngArray(3, 2) = 125
'Adds a V-shaped open polyline to the drawing canvas
shpCanvas.CanvasItems.AddPolyline SafeArrayOfPoints:=sngArray
End Sub
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.