Excel) (FreeformBuilder.AddNodes 方法

在目前圖形中新增一個點，然後從目前節點到新增的最後一個節點之間畫一條線。

語法

運算式。AddNodes (SegmentType， EditingType， X1， Y1， X2， Y2， X3， Y3)

運算式 代表 FreeformBuilder 物件的變數。

參數

名稱 必要/選用 資料類型 描述
SegmentType 必要 MsoSegmentType 要加入的線段類型。
EditingType 必要 MsoEditingType 頂點的編輯屬性。
X1 必要 Single 如果區段的 EditingType 為 msoEditingAuto，此引數會指定從文件左上角到新區段終 點) 的 水平距離 (點。

如果新節點的 EditingType 是 msoEditingCorner，此引數會指定從文件左上角到新區段第一個控制點) 的水平距離 (。
Y1 必要 Single 如果新線段的 EditingType 為 msoEditingAuto，此引數會以點為單位，指定文件的左上角與新線段終點之間的水平距離。

如果新節點的 EditingType 是 msoEditingCorner，此引數會指定從文件左上角到新區段第一個控制點) 的水平距離 (。
X2 選用 Variant 如果新區段的 EditingType 是 msoEditingCorner，此引數會指定從文件左上角到新區段第二個控制點) 的水平距離 (。

如果新區段的 EditingType 為 msoEditingAuto，請勿為此引數指定值。
Y2 選用 Variant 如果新區段的 EditingType 是 msoEditingCorner，此引數會指定從文件左上角到新區段第二個控制點) 的水平距離 (。

如果新區段的 EditingType 為 msoEditingAuto，請勿為此引數指定值。
X3 選用 Variant 如果新區段的 EditingType 是 msoEditingCorner，此引數會指定從文件左上角到新區段第二個控制點) 的水平距離 (。

如果新區段的 EditingType 為 msoEditingAuto，請勿為此引數指定值。
Y3 選用 Variant 如果新區段的 EditingType 是 msoEditingCorner，此引數會指定從文件左上角到新區段第二個控制點) 的水平距離 (。

如果新線段的 EditingType 為 msoEditingAuto，則請勿指定此引數的值。

註解

MsoEditingType 不能是 msoEditingSmooth 或 msoEditingSymmetric。 如果 SegmentType 是 msoSegmentLine，則 EditingType 必須是 msoEditingAuto。

範例

本範例會在 myDocument 中新增一個帶有四個線段的手繪多邊形。

Set myDocument = Worksheets(1) 
With myDocument.Shapes.BuildFreeform(msoEditingCorner, 360, 200) 
    .AddNodes msoSegmentCurve, msoEditingCorner, _ 
        380, 230, 400, 250, 450, 300 
    .AddNodes msoSegmentCurve, msoEditingAuto, 480, 200 
    .AddNodes msoSegmentLine, msoEditingAuto, 480, 400 
    .AddNodes msoSegmentLine, msoEditingAuto, 360, 200 
    .ConvertToShape 
End With

支援和意見反應

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

  • 上次更新時間：