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 支援與意見反應。
意見反應
https://aka.ms/ContentUserFeedback。
即將登場:在 2024 年,我們將逐步淘汰 GitHub 問題作為內容的意見反應機制,並將它取代為新的意見反應系統。 如需詳細資訊,請參閱:提交並檢視相關的意見反應