本示例将取消活动文档中选中的组合图形的组合。
Selection.ShapeRange.Ungroup