Método ShapeRange.Apply (Excel)
Aplica-se à formatação de forma especificada que foi copiada usando o método PickUp .
Sintaxe
expressão. Aplicar
Expressão Uma variável que representa um objeto ShapeRange .
Exemplo
Este exemplo copia a formatação da forma um de myDocument e aplica a formatação copiada à forma dois.
Set myDocument = Worksheets(1)
With myDocument
.Shapes(1).PickUp
.Shapes(2).Apply
End With
Confira também
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.