ShapeRange.GroupItems (Word)
Retorna um objeto GroupShapes que representa as formas individuais no grupo especificado. Somente leitura.
Essa propriedade se aplica a objetos ShapeRange que representam formas agrupadas. Use o método Item do objeto GroupShapes para retornar uma única forma do grupo.
Dim sre As ShapeRange: Set sre =
Dim gssGroupItems As GroupShapes
Set gssGroupItems = sre.GroupItems