共用方式為


Shapes.BuildFreeform 方法 (Excel)

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

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

語法

表達。BuildFreeform (EditingTypeX1Y1)

expression 代表 Shapes 物件的變數。

參數

名稱 必要/選用 資料類型 描述
EditingType 必要 MsoEditingType 第一個節點的編輯屬性。
1個 必要 Single 該位置 (自由形狀繪圖中第一個節點相對於文件左上角)
一年級 必要 Single 手繪多邊形第一個節點的位置 (以點為單位),與文件左上角相對。

傳回值

自由格式建構器

範例

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