ShapeRange.Ungroup (Word)

Desagrupa las formas agrupadas del intervalo de formas especificado, separa las imágenes y los objetos OLE dentro de la forma o el intervalo de formas especificado y devuelve las formas desagrupadas como un solo objeto ShapeRange .

Debido a que un grupo de formas se trata como un único objeto, al agrupar y desagrupar formas cambia el número de elementos de la colección Shapes y cambia los números de índice de los elementos que se incluyen después de las formas desagrupadas de la colección.

Dim sre As ShapeRange: Set sre =  
Dim sreUngroup As ShapeRange
Set sreUngroup = sre.Ungroup()