Und wenn die Zelle A5 dann wieder einen Wert ungleich 0 annimmt, wieder automatisch einzublenden?
Der Weg über Autofilter, benutzerdefiniert, ungleich 0 ist bekannt, erscheint mir aber etwas umständlich.
ich habe dir mal 2 Makros geschrieben die deinen Wunsch erfüllen. Leider blenden sie die Zeile nicht vollautomatisch bei 0 aus, da sollten die VBA-Spezialisten nochmals daran feilen.
Denke aber bitte daran, wie du den Wert (5) zum einblenden in die ausgeblendete Zeile wieder bekommst.
Sub a5Aus()
'
' a5Aus Makro
' Makro am 07.07.2002 von HUlm aufgezeichnet
'
'
Range("A5").Select
If ActiveCell.Value = 0 Then
Selection.EntireRow.Hidden = True
Else
Range("A1").Select
End If
End Sub
Sub a5Ein()
'
' a5Ein Makro
' Makro am 07.07.2002 von HUlm aufgezeichnet
'
'
Range("A5").Select
If ActiveCell.Value = 5 Then
Selection.EntireRow.Hidden = False
Else
Range("A1").Select
End If
End Sub
Gruß Heinz