Shape.Ungroup 方法 (Excel)
取消指定的形状或形状范围中所有组合的形状的组合。 取消指定形状或形状区域中图片和 OLE 对象的组合。
语法
表达式。取消分组
表达 一个代表 Shape 对象的变量。
返回值
一个 ShapeRange 对象,表示未组合的形状。
备注
由于一组形状被视为单个对象,因此对形状进行分组和取消组合会更改 Shapes 集合中的项数,并更改集合中受影响项之后的项目的索引号。
示例
以下示例取消组合 myDocument 中的所有组合形状,并分解所有的图片和 OLE 对象。
Set myDocument = Worksheets(1)
For Each s In myDocument.Shapes
s.Ungroup
Next
以下示例将取消组合 myDocument 中的所有组合形状,但不分解文档中图片或 OLE 对象。
Set myDocument = Worksheets(1)
For Each s In myDocument.Shapes
If s.Type = msoGroup Then s.Ungroup
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈