Considerando que você está tentando usar o VBA para simplificar suas tarefas, é ótimo! Sua macro pode ter sido simples, mas foi um bom começo.
Abaixo está uma macro que você pode colar em ThisWorkbook
no VBA Explorer. Quando executado, ele encontrará a última linha, selecione o intervalo entre a primeira e a última linha (supondo que A1 seja sempre o primeiro) e, em seguida, exclua o intervalo deixando-o com a primeira e a última linha.
Sub Del()
Dim sht As Worksheet
Dim LastRow As Long
Dim DataRange As Range
Set sht = ThisWorkbook.ActiveSheet
LastRow = sht.Cells(sht.Rows.Count, "A").End(xlUp).Row
LastRow = LastRow - 1
Set DataRange = Range("A2:B" & LastRow)
DataRange.Delete
End Sub
Nota: esta macro elimina dados! Use a seu próprio risco.