Shape.Ungroup 方法 (PowerPoint)

  • 项目

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

语法

表达式。取消分组

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

返回值

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 支持和反馈，获取有关如何接收支持和提供反馈的指南。