Shapes.BuildFreeform 方法 (Excel)

會建立手繪多邊形物件。 會傳回 FreeformBuilder 物件，該物件代表正在建立的手繪多邊形。

使用 AddNodes 方法可將區段新增至手繪多邊形。 將至少一個線段新增至手繪多邊形之後，您可以使用 ConvertToShape 方法，將 FreeformBuilder 物件轉換成 Shape 物件，該物件具有您在 FreeformBuilder 物件中定義的幾何描述。

語法

運算式。BuildFreeform (EditingType， X1， Y1)

expression 代表 Shapes 物件的變數。

參數

名稱	必要/選用	資料類型	描述
EditingType	必要	MsoEditingType	第一個節點的編輯屬性。
X1	必要	Single	相對於檔左上角，手繪多邊形中第一個節點的位置 (以點 為單位) 。
Y1	必要	Single	手繪多邊形第一個節點的位置 (以點為單位)，與文件左上角相對。

傳回值

FreeformBuilder

範例

本範例會在 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 支援與意見反應。