Ungroups a group object. | |
Syntax: | Set GefRange = object.Ungroup ( ) |
Description: | Because a group of objects is treated as a single
object, ungrouping an object changes the number of items in the
container's Objects collection and changes the index numbers
of items that come after the affected items in the collection. Any attributes (for example, animation) associated with the GefObject representing the group will be lost. A subsequent call to the Group method will not restore them. Example: Sub GefObject_UnGroup() Dim oCimObj As GefObject Dim oCimRng As GefRange Set oCimObj = CimGetObject Set oCimRng =
oCimObj.Ungroup End Sub |