Este fórum está sendo desativado

[JorgeAlbuquerque]

Olá, segue anexo a planilha no qual preciso resolver uma questão.

Criei esta planilha no qual tem uma tabela até a linha 10, sendo esta marcada como FIM. Preciso de uma macro que descubra qual a ultima linha preenchida, mas esta macro precisa vim de baixo pra cima, que venha da ultima linha da planilha até a linha 10(linha preenchida). Não serve macro de cima para baixo pois terá linhas em branco.
Após identificar a ultima linha preenchida no caso desta planilha atual a linha 10, preciso de uma macro pra selecionar toda a ultima linha (FIM/NÃO DELETAR ESTA LINHA) e insira uma linha acima.
Ao inserir uma linha acima a última linha preenchida como (FIM/NÃO DELETAR ESTA LINHA) vai ficar na linha e baixo no caso linha 11.
Se puderem ajudar agradeço.

[osvaldomp]

Experimente:

Código: Selecionar todos

Sub InsereLinha()
 Rows(Cells(Rows.Count, 1).End(3)(1).Row).Insert
End Sub