Compartilhar via


Método Shape.Ungroup (Word)

Desagrupa todas as formas agrupadas na forma especificada.

Sintaxe

expressão. Desagrupar

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

Valor de retorno

ShapeRange

Comentários

Este método desmonta figuras e objetos OLE dentro da forma especificada e retorna as formas desagrupadas como um único objeto ShapeRange.

Como um grupo de formas é tratado como um único objeto, agrupar e desagrupar formas altera o número de itens na coleção Shapes e altera os números de índice dos itens que vêm após os itens afetados na coleção.

Exemplo

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

Set myDocument = ActiveDocument 
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 = ActiveDocument 
For Each s In myDocument.Shapes 
 If s.Type = msoGroup Then s.Ungroup 
Next

Confira também

Objeto Shape

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.