Programando o Excel ® Vba Para Leigos - 2ª Ed 2013 NoDRM (1)

Capítulo 4: Introdução ao Modelo de Objeto Excel
63
LEMBRE-SE
Depois que o Excel executa esse procedimento, a célula A1 na Planilha1
da pasta de trabalho ativa passa a conter o valor de 94,92. Se a pasta de
trabalho ativa não tiver uma planilha nomeada Plan1, ao executar a
macro será exibida uma mensagem de erro.O VBA apenas segue
instruções e não pode trabalhar com uma planilha que não existe.
Cada objeto tem seu próprio conjunto de propriedades, embora
algumas propriedades sejam comuns a todos os objetos. Por exemplo,
muitos (mas não todos) objetos têm uma propriedade Visible (visível).
A maioria dos objetos também tem uma propriedade Name.
Algumas propriedades de objeto são apenas para leitura, o que significa
que você pode ver o valor da propriedade, mas não pode mudá-lo.
Como mencionei anteriormente neste capítulo, uma coleção também é
um objeto. Isto significa que uma coleção também tem propriedades. Por
exemplo, você pode determinar como várias pastas de trabalho são
abertas acessando a propriedade Count da coleção Workbooks. O
seguinte procedimento VBA exibe uma caixa de mensagem informando
quantas pastas de trabalho estão abertas:
Sub CountBooks()
MsgBox Workbooks.Count
End Sub
Métodos de Objeto
Além das propriedades, os objetos têm métodos. Um método é uma ação
que você executa com um objeto. Um método pode mudar propriedades
de um objeto ou fazer com que o objeto faça alguma coisa.
Este simples exemplo usa o método ClearContents em um objeto Range
para apagar o conteúdo da célula A1 na planilha ativa:
Sub ClearRange()
Range(“A1”).ClearContents
End Sub
Alguns métodos tomam um ou mais argumentos. Um argumento é um
valor que especifica mais a ação a ser executada.Você coloca os
argumentos para um método depois dele, separado por um espaço.
Argumentos múltiplos são separados por vírgula.
O exemplo a seguir ativa Plan1 (na pasta de trabalho ativa) e depois
copia o conteúdo da célula A1 para a célula B1 usando o método Copiar
do objeto Range. Nesse exemplo, o método Copy tem um argumento, o
intervalo (range) destinado à operação de cópia:
Sub CopyOne()
Worksheets(“Plan1”).Activate
Range(“A1”).Copy Range(“B1”)
End Sub