como ocultar una fila automaticamente si no posse datos?

hola, Mauricio !

... ocultar filas... cuando sus valores son cero
... que se habran automaticamente si reciben algun valor superior a cero.

suponiendo que el rango es: 'D16:D26' ->copia las siguientes lineas<-...
en el modulo de codigo de 'esa' hoja ==Private Sub Worksheet_Calculate()
Dim Celda As Range
Application.ScreenUpdating = False
For Each Celda In Range("d16:d26")
Celda.EntireRow.Hidden = (Celda = 0)
Next
End Sub

si requieres 'invertir el ocultamiento'... modifica a ... = (Celda <> 0)
si tu rango pudiera ser [de]creciente... cambia a... In Range([d16], [d65536].End(xlUp))

saludos,
hector.

Gracias Hector Miguel, tu respuesta me sirvió perfectamente para los fines
que buscaba.
Te lo agradezco, y espero poder rettribuir tu ayuda cuando necesites. mil
gracias.

hola, Mauricio !

... me sirvio... para los fines que buscaba.
Te lo agradezco, y espero poder retribuir tu ayuda cuando necesites.

gracias a ti [por el 'feed-back' y por el ofrecimiento]
'en el camino andamos'

saludos,
hector.