Shapes.AddConnector-Methode (Publisher)
Fügt der angegebenen Shapes-Auflistung ein neues Shape-Objekt hinzu, das einen Verbinder darstellt.
Syntax
Ausdruck. AddConnector (Type, BeginX, Beginy, EndX, EndY)
expression Eine Variable, die ein Shapes-Objekt darstellt.
Parameter
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
Typ | Erforderlich | MsoConnectorType | Der Typ der Verbindung, die hinzugefügt werden soll. Dies kann eine der MsoConnectorType-Konstanten sein, mit Ausnahme von msoConnectorTypeMixed, das nicht mit dieser Methode verwendet wird. |
BeginX | Erforderlich | Variant | Die x-Koordinate des Startpunkts der Verbindung. |
BeginY | Erforderlich | Variant | Die y-Koordinate des Startpunkts der Verbindung. |
EndX | Erforderlich | Variant | Die x-Koordinate des Endpunkts der Verbindung. |
EndY | Erforderlich | Variant | Die y-Koordinate des Endpunkts der Verbindung. |
Rückgabewert
Form
Bemerkungen
Für die Parameter 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").
Der neue Connector ist nicht mit einem anderen Shape verbunden. Verwenden Sie die Methoden BeginConnect und EndConnect, um die neue Verbindung zu einem anderen Shape verbinden.
Beispiel
Das folgende Beispiel fügt der ersten Seite der aktiven Publikation eine neue gerade Verbindung hinzu.
Dim shpConnect As Shape
Set shpConnect = ActiveDocument.Pages(1).Shapes.AddConnector _
(Type:=msoConnectorStraight, _
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.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für