Shapes.AddLine-Methode (Publisher)

Fügt der angegebenen Shapes-Auflistung ein neues Shape-Objekt hinzu, das eine 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	Variant	Die x-Koordinate des Startpunkts der Linie.
BeginY	Erforderlich	Variant	Die y-Koordinate des Startpunkts der Linie.
EndX	Erforderlich	Variant	Die x-Koordinate des Endpunkts der Linie.
EndY	Erforderlich	Variant	Die y-Koordinate des Endpunkts der Linie.

Rückgabewert

Form

Bemerkungen

Für die Argumente BeginX, BeginY, EndX und EndY werden numerische Werte in Punkten ausgewertet. Zeichenfolgen können in beliebigen Einheiten enthalten sein, die von Microsoft Publisher unterstützt werden (z. B. "2,5 zoll").

Beispiel

Das folgende Beispiel fügt der ersten Seite der aktiven Publikation eine neue Linie hinzu.

Dim shpLine As Shape 
 
Set shpLine = ActiveDocument.Pages(1).Shapes.AddLine _ 
 (BeginX:=144, BeginY:=144, _ 
 EndX:=180, EndY:=72) 

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.