Método ShapeRange.PickUp (Word)

Copia a formatação da forma especificada.

Sintaxe

expressão. Coletor

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

Comentários

Use o método Apply para aplicar a formatação copiada a outra forma.

Exemplo

Este exemplo copia a formatação da forma um de myDocument e aplica a formatação copiada à forma dois.

Set myDocument = ActiveDocument 
With myDocument 
 .Shapes(1).PickUp 
 .Shapes(2).Apply 
End With

Confira também

Objeto da coleção ShapeRange

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.