ShapeRange.Ungroup 方法 (PowerPoint)

取消指定的形状或形状范围中所有组合的形状的组合。反汇编中图片和 OLE 对象指定的形状或形状范围。取消组合的形状以单个 ShapeRange 对象的形式返回。

语法

表达式。取消分组

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

ShapeRange

由于一组形状被视为单个对象，组合和取消组合的形状的 Shapes 集合中项的数目，并更改集合中受影响的项之后的项的索引号。

以下示例取消组合 myDocument 中的所有组合形状，并分解所有的图片和 OLE 对象。

Set myDocument = ActivePresentation.Slides(1)

For Each s In myDocument.Shapes

    s.Ungroup

Next

本示例取消 myDocument 中的所有形状组合，但不分解幻灯片中的图片或 OLE 对象。

Set myDocument = ActivePresentation.Slides(1)

For Each s In myDocument.Shapes

    If s.Type = msoGroup Then s.Ungroup

Next

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