Anmerkung
Der Zugriff auf diese Seite erfordert eine Genehmigung. Du kannst versuchen, dich anzumelden oder die Verzeichnisse zu wechseln.
Der Zugriff auf diese Seite erfordert eine Genehmigung. Du kannst versuchen , die Verzeichnisse zu wechseln.
Erstellt eine Linie. Gibt ein Shape -Objekt, das die neue Linie darstellt.
Syntax
Ausdruck.
AddLine( _BeginX_, _BeginY_, _EndX_, _EndY_ )
expression Eine Variable, die ein Shapes-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| BeginX | Erforderlich | Single | Die in Punkten gemessene horizontale Position des Anfangspunkts der Linie relativ zum linken Folienrand. |
| BeginY | Erforderlich | Single | Die in Punkten gemessene vertikale Position des Anfangspunkts der Linie relativ zum oberen Folienrand. |
| EndX | Erforderlich | Single | Die in Punkten gemessene horizontale Position des Endpunkts der Linie relativ zum linken Folienrand. |
| EndY | Erforderlich | Single | Die in Punkten gemessene vertikale Position des Endpunkts der Linie relativ zum oberen Folienrand. |
Rückgabewert
Form
Beispiel
In diesem Beispiel wird myDocument eine blaue gestrichelte Linie hinzugefügt.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddLine(BeginX:=10, BeginY:=10, _
EndX:=250, EndY:=250).Line
.DashStyle = msoLineDashDotDot
.ForeColor.RGB = RGB(50, 0, 128)
End With
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.