Necesito eliminar filas de una base de datos que tengan celda vacía en la columna A. Los datos de mi BD empiezan en la fila 9

[Hola 

Te paso la macro

Para finalizar hay 2 opciones Excelente o bueno saludos!

Sub eliminar()
'
'Por Adriel Ortiz
'
    Set h = Sheets("Hoja1")
    u = h.Range("A" & Rows.Count).End(xlUp).Row
    For i = u To 9 Step -1
        If h.Cells(i, "A") = "" Then
            h.Rows(i).Delete
        End If
    Next i
    MsgBox "Fin"
End Sub