Question

全部显示

应用于 FreeformBuilder 对象的 ConvertToShape 方法。

创建一个图形，该图形具有指定对象的几何图形特征。返回一个 Shape 对象，该对象代表新图形。

expression.ConvertToShape(Anchor)

expression必需。该表达式返回一个 FreeformBuilder 对象。

AnchorVariant 类型，可选。Range 对象，代表与图形绑定在一起的文本。如果指定 Anchor，锁定位置位于锁定区域第一段的段首。如果省略此参数，将自动选定锁定区域，此图形也将定位于页面的上边界和左边界的相对位置。

应用于 InlineShape 对象的 ConvertToShape 方法。

将嵌入式图形转换为可自由浮动的图形。返回一个 Shape 对象，该对象代表新图形。

expression.ConvertToShape

expression 必需。该表达式返回一个 InlineShapes 对象。

说明

使用 ConvertToShape 方法前，最少应该已经对 FreeformBuilder 对象用过一次 AddNodes 方法。

示例

当应用于 InlineShape 对象时。

本示例将活动文档的第一个嵌入式图形转化为浮动的图形。

ActiveDocument.InlineShapes(1).ConvertToShape

当应用于 FreeFormBuilder 对象时。

本示例将一个有五个顶点的任意多边形添至 myDocument中。

Set myDocument = ActiveDocument
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