Crear macro para eliminar filas cuyo valor sea igual a cero

Esta macro hace lo que necesitas:

Sub Eliminar_filas()
'Ultima fila de datos
uf = Range("A" & Rows.Count).End(xlUp).Row
'Recorremos el bucle desde la última fila con datos, hasta la fila 6'
For f = uf To 6 Step -1
    'Si la celda de la columna "E" de la fila examinada'
    'Es igual a 0 o no está en blanco'
    If Cells(f, "E") = 0 Or Cells(f, "E") = "" Then
        'Borra la fila'
        Rows(f).Delete
    End If
Next
End Sub

Para ejecutarla puedes asignarla a un botón a una combinación de teclas.
Para un botón:

http://support.microsoft.com/kb/141689/es-es 

Para combinación de teclas:

http://office.microsoft.com/es-es/excel-help/ejecutar-una-macro-HP010014113.aspx#BMrunmacroshortcut

Si te ha valido la respuesta.

Sub Eliminar_filas()

'Ultima fila de datos'
uf = Range("A" & Rows.Count).End(xlUp).Row

'Recorremos el bucle desde la última fila con datos, hasta la fila 6'
For f = uf To 6 Step -1

'Si la celda de la columna "E" de la fila examinada'
'Es igual a 0 o está en blanco'
If Cells(f, "E") = 0 Or Cells(f, "E") = "" Then
'Borra la fila'
Rows(f).Delete
End If
Next
End Sub

Hola Marcial, muchas gracias por tu respuesta. La verdad es que corrí la macro y si funciona pero cometí un error y es que en lugar de verificar si la columna E está en cero, necesito que sea la columna F porque de lo contrario me borra otra información que hay más abajo. 

Intenté corregirlo pero como no entiendo, no pude hacer nada. 

Gracias