ShapeNode.Points-Eigenschaft (Publisher)

Ruft die x- und y-Koordinaten des Formknotens ab. Schreibgeschützt.

Syntax

Ausdruck. Punkte

Ausdruck Eine Variable, die ein ShapeNode-Objekt darstellt.

HinwBemerkungeneise

Diese Eigenschaft ist schreibgeschützt. Verwenden Sie die SetPosition -Methode, um die Position des Knotens festzulegen.

Beispiel

Dieses Beispiel verschiebt Knoten 2 in Form 1 auf der ersten Seite der aktiven Publikation um 200 Punkt nach rechts und um 300 Punkt nach unten. Damit das Beispiel funktionsfähig ist, muss es sich bei dieser Form um eine Freihandformzeichnung handeln.

Sub SetPointsPosition() 
 Dim varArray As Variant 
 Dim intX As Integer 
 Dim intY As Integer 
 With ActiveDocument.Pages(1).Shapes(1).Nodes 
 varArray = .Item(2).Points 
 intX = varArray(1, 1) 
 intY = varArray(1, 2) 
 .SetPosition Index:=2, X1:=intX + 200, Y1:=intY + 300 
 End With 
End Sub

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.