Método Shape.Ungroup (Excel)

Desagrupa quaisquer formas agrupadas na forma especificada ou intervalo de formas. Desagrupa imagens e objetos OLE dentro da forma ou do intervalo de formas especificado.

Sintaxe

expressão. Desagrupar

expressão Uma variável que representa um objeto Shape.

Valor de retorno

Um objeto ShapeRange que representa as formas não agrupadas.

Comentários

Uma vez que um grupo de formas é tratado como um único objeto, agrupar e desagrupar formas altera o número de itens na coleção Formas e altera os números de índice dos itens que vêm a seguir aos itens afetados na coleção.

Exemplo

Este exemplo desagrupa qualquer forma agrupada e desmonta qualquer figura ou objetos OLE em myDocument.

Set myDocument = Worksheets(1) 
For Each s In myDocument.Shapes 
 s.Ungroup 
Next

Este exemplo desagrupa qualquer forma agrupada em myDocument sem desmontar figuras ou objetos OLE no documento.

Set myDocument = Worksheets(1) 
For Each s In myDocument.Shapes 
 If s.Type = msoGroup Then s.Ungroup

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.