共用方式為


ShapeNode.Points 屬性 (Publisher)

會取得圖形節點的 x-y- 座標。 唯讀。

語法

運算式

表達 代表 ShapeNode 物件的變數。

註解

這是唯讀屬性。 使用 SetPosition 方法可設定之節點的位置。

範例

本範例將使用中出版物第一頁的圖案一的節點二,向右移動 200 點和向下移動 300 點。 為了讓本範例順利運作,圖案一必須是手繪多邊形繪圖。

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 支援與意見反應