Você já precisou preencher tabelas ou cadastrar informações usando VBA? Provavelmente precisou encontrar a primeira linha vazia.
Caso prefira esse conteúdo no formato de vídeo-aula, assista ao vídeo abaixo!
Clique aqui para baixar a planilha utilizada nessa publicação!
Fala impressionadores! Na aula de hoje vamos aprender como encontrar a primeira linha vazia de uma tabela, independente do número de linhas que essa tabela tenha.
Fazer isso pelo Excel é bem simples, se estiver na última linha da tabela clique em control + seta para cima e vai encontrar a última linha preenchida. Se estiver na primeiro linha da tabela use o control + seta para baixo e vai obter o mesmo resultado.
Para saber qual é a primeira linha vazia, é só descer uma célula após já estar na última célula preenchida.
Como fazer isso pelo VBA?
Para isso, vamos ter que descobrir como simular esse atalho CTRL Seta para baixo/cima no VBA.
Nessa aula vou te mostrar duas formas de fazer isso utilizando a propriedade .End(xlUp) e .End(xlDown).
E aí? Quer aprender a descobrir a última linha em branco e preenchida pelo VBA?
É só baixar o material da aula e entrar no ambiente VBA -> para isso clique no atalho alt + F11 ou Fn + alt + F11.
Dentro do ambiente VBA clique no ícone criar módulo -> em seguida na opção módulo
Código:
Sub ultima_linha() -> Todo código vai começar com o Sub, seguido do nome do código, observe que o nome do código não pode ter caracteres especiais nem espaço.
End Sub -> Fim do código
Observe que o código para encontrar a última linha é muito simples, primeiro criamos e damos um nome intuitivo a variável (linha =).
Após, vamos indicar em qual aba da nossa planilha queremos encontrar a última linha preenchida ou em branco. Feito isso, vamos começar a pesquisa a partir da última linha da tabela -> (linha nº A1048576) em seguida usamos o .End(xlUp) que é o mesmo que clicar em seta para cima.
Se você estiver na última linha do Excel e usar o comando control + seta para cima vai notar que você não é levado a linha nº1 e sim a última linha onde temos um valor registrado, o que estamos fazendo aqui no VBA é justamente reproduzindo este código em um formato que o VBA entende.
Agora para encontrar a próxima linha em branco é fácil, afinal a última linha em branco é o mesmo que a última linha preenchida + 1 linha, ou seja:
linha = Sheets("Primeira Aba") .Range ("A1048576") .End(xlUp) . Row + 1Apenas vamos acrescentar o +1 no final do código, salve o código e, clicando na tecla F8 e executando a linha do código, vamos descobrir qual é o número da última linha em branco da nossa tabela.
Você já conhecia o atalho control + seta para cima? Sabia que podemos criar esse comando e usar a mesma lógica dentro do VBA?
Fiz esta aula para te mostrar como descobrir qual a última linha preenchida e qual a última linha em branco da tabela, agora você já pode usar esse conhecimento em seus projetos VBA!
Eu fico por aqui! Até breve!
Para acessar outras publicações de VBA, clique aqui!
Expert em VBA e Power BI da Hashtag Treinamentos. Auxilia no suporte aos alunos da Hashtag Treinamentos e na criação de conteúdos para os que acompanham nossos canais.
Quer sair do zero em Python e virar uma referência na sua empresa? Matricule-se agora mesmo no Python Impressionador!