Olá Borracha31,
Cole o codigo abaixo num módulo VBA "ALT+F11"
Sub ExcluiLinha()
'
' ExcluiLinha Macro
'
'
Rows("1:3").Select
Selection.Delete Shift:=xlUp
End Sub
Este código elimina as linhas de 1 a 3
Se quiser atribua a um botão. Para isso a Aba Desenvolvedor precisa estar visível
(Opções do Excel > Personalizar faixa de opções > marque a opção "desenvolvedor")
Postado : 12/08/2025 1:39 pm