Última linha da planilha em VBA

Possivelmente, se você chegou aqui é por que deseja descobrir como encontrar a última linha do Excel com VBA.

No entanto, caso você tem o hábito de automatizar formulários de cadastro entre outras alternativas, surge a necessidade de inserir os dados após a última linha do excel.

Mas, para isso, precisamos inserir um código simples, porém pouco conhecido de como localizar a nossa última linha. Em outras palavras, através da aba de desenvolvedor (Alt+F11), crie um novo módulo e insira o código abaixo:

Public Sub Ultima_Linha()

Dim ul As String

ul = Cells(Rows.Count, 1).End(xlUp).Row

End Sub

Portanto, como resumo do que fizemos acima: ul = Cells(Rows.Count, 1).End(xlUp).Row

• Dim ul: Declaramos a nossa variável ul, como referência das iniciais última linha.
• ul: Portanto, ficou como nossa variável.
• Cells(Rows.Count,1): Fez uma referência de contagem do número de linhas, na Coluna 1. Em outras palavras, Coluna A.
• .End(xlUp).Row: Realizou a seleção do cursor na última linha da planilha.

Como resultado, ao posicionar o cursor de maneira manual através do F8, podemos perceber o resultado obtido abaixo.

Mas, e se precisar da próxima linha após a célula 4. Em outras palavras, a última linha vazia.

Public Sub Ultima_Linha()

Dim ul As String

ul = Cells(Rows.Count, 1).End(xlUp).Offset(1,0).Row

End Sub

Portanto, é possível apenas substituir a última parte “.Row” por “.Offset(1,0).Row“. No entanto, ele fará um deslocamento abaixo a partir da última linha.

Importante: Offset(1,0), o número 1 refere a quantidade de linhas a ser deslocada abaixo, caso você deseja deslocar mais de uma linha, basta alterar o valor.

• Aprenda a Como criar CALENDÁRIO em VBA através desse excelente passo a passo.

Portanto, hoje aprendemos como encontrar a última linha do excel de duas maneiras. No entanto, caso você conheça alguma outra maneira, compartilhe conosco, através dos comentários.