Question

全部显示

应用于ShapeNodes 对象的 Delete 方法。

删除形状结点。

expression.Delete(Index)

expression必选。该表达式返回一个 ShapeNodes 对象。

Index必选。Long 类型。指定要删除的结点。该结点后的段也将被删除。若该结点是一条曲线的控制点，则该曲线及其所有结点将都被删除。

应用于Tags 对象的 Delete 方法。

删除标记。

expression.Delete(Name)

expression必选。该表达式返回一个 Tags 对象。

Name必选。String 类型。指定要删除的标记的名称。

应用于“应用于”列表中所有其他对象的 Delete 方法。

删除指定对象。

expression.Delete

expression必选。该表达式返回“应用于”列表中的对象之一，ShapeNodes 和 Tags 对象除外。

说明

试图删除表格中唯一的行或列会导致运行时错误。

示例

应用于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