API Documentation > CorelDRAW > 2025-v26 > ShapeRange > IVGShapeRange
ShapeRange.UngroupAll method
Ungroups all shapes including nested groups
Syntax:
Sub UngroupAll()
Remarks:
The UngroupAll method ungroups all the groups in a shape range.
Examples:
The following VBA example ungroups any groups on the active page.
Sub Test()
ActivePage.Shapes.All.UngroupAll 
End Sub