ocultar y mostrar una fila si es igual a 0

El siguiente código va en el módulo de la hoja (click derecho sobre su etiqueta->Ver código), y sirve para ocultar la fila 5 si la celda A1=0 y mostrar dicha fila en caso contrario:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then If [A1] = 0 Then Rows(5).Hidden = True Else Rows(5).Hidden = False
End Sub


Un saludo.


Fernando Arroyo
MS MVP - Excel

P.D.: Te sugiero que evites escribir todo el texto de tus mensajes en mayúsculas, primero porque se lee peor y segundo porque se considera que estás gritando.


"LordCrom" escribió en el mensaje news:

QUIEREO OCULTAR UNA FILA CUANDO EL VALOR DE UNA CASILLA SEA 0 Y MOSTRARLA
AUTOMATICAMENTE CUANDO SEA MAYOR QUE 0. GRACIAS POR ANTICIPADO