Essa é minha primeira dica do dia e, com ela, tentarei enfrentar uma questão comum usando o VBA no Excel. Isso é
Como posso encontrar a última linha usada em uma folha específica?
Existem vários métodos para fazer isso, alguns mais exatos do que outros, mas todos podem atender às suas necessidades.
Um método comum
LastRow = Cells.SpecialCells(xlCellTypeLastCell).Row
O que não é muito exato, porque o Excel não controla a última célula de uma forma muito adequada.
Outro método para encontrar a última linha usada em uma coluna específica é:
LastRowColA = Range("A65536").End(xlUp).Row
Mas isso não informa COM CERTEZA a última linha usada em toda a planilha, a menos que você tenha certeza de que a Coluna A contém os dados.
Alguns métodos extras são mais confiáveis.
LastRow = Cells.Find("*",SearchOrder:=xlByRows,SearchDirection:=xlPrevious).Row
ou
LastRow = ActiveSheet.UsedRange.Rows.Count
Esses métodos podem ser usados em qualquer planilha, não apenas na planilha ativa.