PowerPoint) (ShapeNodes.Insert 方法

在手繪多邊形的指定節點後插入新線段。

語法

運算式。插入 (Index、SegmentType、EditingType、X1、Y1、X2、Y2、X3、Y3)

表達 代表 ShapeNodes 物件的變數。

參數

名稱	必要/選用	資料類型	描述
Index	必要	Long	要在其後插入新節點的節點。
SegmentType	必要	MsoSegmentType	要加入的線段類型。
EditingType	必要	MsoEditingType	頂點的編輯屬性。
X1	必要	Single	如果新的線段的 EditingType 是 msoEditingAuto ，這個引數指定的水平距離 (以點為單位) 文件的左上角的新線段端點。 如果新節點 EditingType msoEditingCorner ，這個引數會指定從文件的左上角的水平距離 (以點為單位) 至新的線段的第一個控制點。
Y1	必要	Single	如果新的線段的 EditingType 是 msoEditingAuto ，這個引數指定的垂直距離 (以點為單位) 文件的左上角的新線段端點。 如果新節點 EditingType msoEditingCorner ，則此引數會指定從文件的左上角的垂直距離 (以點為單位) 至新的線段的第一個控制點。
X2	選用	Single	如果新的線段的 EditingType msoEditingCorner ，則此引數會指定從文件的左上角的水平距離 (以點為單位) 至新的線段的第二個控制點。 新的線段的 EditingType 是 msoEditingAuto ，如果未指定此引數的值。
Y2	選用	Single	如果新的線段的 EditingType msoEditingCorner ，則此引數會指定從文件的左上角的垂直距離 (以點為單位) 至新的線段的第二個控制點。 新的線段的 EditingType 是 msoEditingAuto ，如果未指定此引數的值。
X3	選用	Single	如果新的線段的 EditingType msoEditingCorner ，這個引數指定的水平距離 (以點為單位) 文件的左上角的新線段端點。 新的線段的 EditingType 是 msoEditingAuto ，如果未指定此引數的值。
Y3	選用	Single	如果新的線段的 EditingType msoEditingCorner ，則此引數會指定從文件的左上角的垂直距離 (以點為單位) 新的線段的端點。 新的線段的 EditingType 是 msoEditingAuto ，如果未指定此引數的值。

註解

SegmentType參數值可以是下列其中一個MsoSegmentType常數。

msoSegmentCurve
msoSegmentLine

EditingType參數值可以是下列其中一個MsoEditingType常數。

msoEditingAuto
msoEditingCorner

範例

本範例向 myDocument 中第三個圖案的第四個節點之後，新增光滑節點和弧形段落。 第三個圖案必須是至少有四個節點的自由圖形繪圖。

Set myDocument = ActivePresentation.Slides(1)

With myDocument.Shapes(3).Nodes
    .Insert Index:=4, SegmentType:=msoSegmentCurve, _
        EditingType:=msoEditingSmooth, X1:=210, Y1:=100
End With

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。