Acredito que alguma vez vc precisou selecionar uma tabela inteira do Excel pelo VBA, correto? Certamente você precisaria selecionar a 1ª linha da tabela e criar um código que identificasse a última linha, para assim conseguir selecionar toda tabela. A partir de agora não é preciso mais ter esta dor de cabeça. Neste artigo você vai aprender tudo sobre a Propriedade CURRENTREGION do Excel.
Mas você deve estar se perguntando:
Mas este canal não produz apenas conteúdos sobre Microsoft Access?
A partir deste artigo, prepare-se para mergulhar em um conteúdo já muito explorado na internet, mas que muitos ainda têm dúvidas, que é o Excel VBA. Nosso objetivo é abordar sobre como utilizar a ferramenta para que você possa ter mais produtividade em suas atividades, sejam elas profissionais, acadêmcicas ou pessoais.
Vamos ao conteúdo???
Imagine que você precise copiar esta tabela abaixo (Aba Vendas) e colar em uma outra planilha (Aba Planilha 1).
A Propriedade CURRENTREGION do Excel pode nos auxiliar nesta tarefa.
Você sabe as características desta Propriedade?
Passo 1: Aprendendo sobre a Propriedade CURRENTREGION do Excel
Esta propriedade representa a região atual que compreende toda a tabela. Entenda que para ela funcione efetivamente, não poderá haver linhas em branco no meio da tabela, senão a região atual irá até encontrar a 1ª linha em branco da tabela.
Ela é uma Propriedade do Objeto Range e tem a seguinte sintaxe:
Sintaxe: Intervalo.CURRENTREGION
Passo 2: Usando a Propriedade CURRENTREGION do Excel
Para que possamos copiar a tabela para outra planilha, devemos criar a seguinte sintaxe em um Módulo do VBA do Excel:
Sub CopiarEmUmaLinha()
Dim rngTabela As Range
Sheets("Vendas").Select
Set rngTabela = Range("A1").CurrentRegion
rngTabela.Copy Destination:=Sheets("Planilha1").Range("A1")
End Sub
Perceba que eu atribuo referência a toda minha tabela, a medida que a declaro como um intervalo (Classe Range). Dessa forma eu poderia fazer qualquer coisa com este intervalo, tais como: formatar fonte, cor da célula, nomear, enfim, várias possibilidades.
Mas como o objetivo era copiar, podemos usar o Método COPY do objeto RANGE que possui a seguinte sintaxe:
Sintaxe: Intervalo.COPY(Detino)
Este método COPY possui apenas um parâmetro (opcional) que é o Destino. Nele podemos parametrizar aonde o objeto copiado vai ser “colado”, que é na primeira céula da planilha.
Ao executar o código no módulo do VBA, temos o seguinte resultado:
Conclusão
Agora que você sabe como utilizar a Propriedade CURRENTREGION do Excel, fica mais fácil manipular tabelas ou planilhas no Excel. Mas lembre, ela só será eficiente se você não tiver linhas vazias no meio da tabela, que neste caso precisaremos utilizar outro recurso que abordaremos no próximo conteúdo, ok?
Se este conteúdo fez algum sentido para você, deixe seu comentário aqui embaixo!!
Nos encontramos no próximo artigo!
Abs