Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés. Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Aquí te dejo un procedimiento que te puede servir.
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Value = 0 Then Target.EntireRow.Hidden = True ElseIf Target.Value = 1 Then Exit Sub Else Exit Sub End If End Sub