Excel) (FreeformBuilder.ConvertToShape方法的

會建立具有指定之 FreeformBuilder 物件的幾何特性的圖形。 會傳回代表新圖案的 Shape 物件。

語法

表達。轉換成形狀

詞 代表 FreeformBuilder 物件的變數。

傳回值

圖形

註解

您必須套用 AddNodes 方法向 FreeformBuilder 物件至少一次使用 ConvertToShape 方法之前。

範例

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