ShapeNode.Points プロパティ (Publisher)

図形ノードの x 座標および y 座標を取得します。 読み取り専用です。

構文

ポイント

ShapeNode オブジェクトを表す変数。

注釈

このプロパティは、読み取り専用です。 セット ポジション メソッドを使用すると、ノードの場所を設定します。

次の使用例は、作業中の文書の先頭ページにある図形 1 の接点 2 を、右へ 200 ポイント、下へ 300 ポイント移動します。 この使用例が正しく動作するためには、図形 1 がフリーフォームの描画オブジェクトである必要があります。

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

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。