Shape.Delete 方法 (PowerPoint)

删除指定的 Shape 对象。

语法

表达式删除

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

示例

本示例从活动演示文稿的第一张幻灯片中删除所有任意多边形。

With Application.ActivePresentation.Slides(1).Shapes

    For intShape = .Count To 1 Step -1

        With .Item(intShape)

            If .Type = msoFreeform Then .Delete

        End With

    Next

End With

另请参阅

形状对象

支持和反馈

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