ocultar fila con condicional

hola, 'anonimo' !

Necesito ocultar las filas de una hoja, sujetas a la siguiente condicion
por ejemplo si en la fila 4 la celda AB4 >0, se oculta si no se muestra y asi las demas filas
fila 30, AB30>0, se oculta, si no se muestra.-

1) toma nota que al modificar las propiedades de un rango por codigo, se pierde el beneficio del deshacer, undo, ctrl+Z :-((

2) tambien deberas decidir si las siguientes lineas las usas [p.e.] en el evento '_calculate' de *esa* hoja...
o las dejas en una macro que sea ejecutada a voluntad/discrecion/necesidad/... -?-

Dim Celda As Range
For Each Celda In Range("ab4,ab30")
Celda.EntireRow.Hidden = Celda = 0
Next

3) si necesitas incluir otras celdas... [ya sabes cual linea modificar] :))

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.