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
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen