VBA no Excel para Iniciantes: Parte 4

Dando continuidade a série de artigos sobre VBA no Excel para iniciantes, hoje falaremos um pouco sobre Objeto Range.

O objeto Range , que é a representação de uma célula (ou células) em sua planilha, sendo o objeto mais importante de Excel/ VBA . Este artigo apresenta uma visão geral das propriedades e métodos do objeto Range. As propriedades são algo que um objeto tem (que descrevem o objeto), enquanto que os métodos fazer alguma coisa (que executam uma ação com um objeto).

Já está interessado(a) no que vem por aí? Então compartilhe com sua rede de amigos para que mais pessoas possam aprender a usar o VBA no Excel:

Facebook

Twitter

Google+

LinkedIn

VBA para Iniciantes: Cells e declaração de Range

Exemplo: Coloque um botão de comando em sua planilha e adicione a seguinte linha de código:

Range ("B3"). Value = 2
VBA1
 Como resultado temos o número 2 inserido na célula B3.
VBA2
 Agora insira um novo código conforme mostrado abaixo:
Range ("A1: A4"). Value = 7
VBA3
 Como resultado temos o valor 7 aplicado no intervalo de A1 até A4
VBA4
Para um terceiro exemplo podemos inserir a seguinte linha de comando:
Range("A1:A2,B3:C4").Value = 10
VBA5
Como resultado temos:
VBA6

Cells

Em vez de utilizamos o comando Range, podemos utilizar o comando Cells. Usando o comando Cells é particularmente útil quando você quer laço através de intervalos.
Veja os exemplos abaixo para melhor compreensão:
Insira o seguinte código em um botão de comando:
Cells(3, 2).Value = 2
VBA7
Observe que teremos o mesmo resultado demonstrado no primeiro exemplos de Range, ou seja, insere-se o valor 2 na célula na interseção da linha 3 e coluna 2.
VBA8
Para um segundo exemplo podemos aplicar o seguinte código:
Range(Cells(1, 1), Cells(4, 1)).Value = 7
Ao término da operação temos o seguinte resultado:
VBA9


Declarando uma Range

É possível declarar um objeto Range, usando as palavras-chave Dim e Set. Veja os exemplos abaixo:
Exemplo:
Insira o código abaixo em um botão de comando:
Dim example As Range

Set example = Range("A1:C4")

example.Value = 8
img10
Ao término da operação temos o seguinte resultado:
VBA11