通过

FreeformBuilder.ConvertToShape 方法 (PowerPoint)

  • 项目

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

语法

expression。 ConvertToShape

表达 一个代表 FreeformBuilder 对象的变量。

返回值

Shape

说明

您必须应用AddNodes方法对 FreeformBuilder 对象至少一次使用 ConvertToShape 方法之前。

示例

本示例向当前演示文稿的第一张幻灯片中添加一个具有五个顶点的任意多边形。

Set myDocument = ActivePresentation.Slides(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

另请参阅

FreeformBuilder 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。