Share via

Método Shape.Ungroup (Word)

  • Artigo

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.