Freigeben über


ShapeNodes.SetPosition-Methode (Excel)

Legt die Position des durch Index angegebenen Knotens fest. Beachten Sie, dass je nach Bearbeitungsart des Knotens kann diese Methode die Position benachbarter Knoten beeinflussen.

Syntax

Ausdruck. SetPosition (Index, X1, Y1)

Ausdruck Eine Variable, die ein ShapeNodes-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Index Erforderlich Long Der Knoten, dessen Position festgelegt werden soll.
X1 Erforderlich Single Die Position (in Punkt) des neuen Knotens relativ zur linken oberen Ecke des Dokuments.
Y1 Erforderlich Single Die Position des neuen Knotens (in Punkt), relativ zur oberen linken Ecke des Dokuments.

Beispiel

In diesem Beispiel wird Knoten 2 in Form 3 in myDocument um 200 Punkte nach rechts und um 300 Punkte nach unten verschoben. Form 3 muss eine Freihandform-Zeichnung sein.

Set myDocument = Worksheets(1) 
With myDocument.Shapes(3).Nodes 
 pointsArray = .Item(2).Points 
 currXvalue = pointsArray(0, 0) 
 currYvalue = pointsArray(0, 1) 
 .SetPosition 2, currXvalue + 200, currYvalue + 300 
End With

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.