创建具有指定的 FreeformBuilder 对象的几何特征的形状。 返回一个 Shape 对象,该对象表示新的形状。
语法
表达式。ConvertToShape
表达 一个代表 FreeformBuilder 对象的变量。
返回值
Shape
说明
您必须应用 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。