wann sollen die Zellen ausgeblendet werden, bei Eingabe der 0, beim Aktivieren des Arbeitsblattes, per Knopfdruck? Dito für das Einblenden. Wie kommt die 0 in Spalte C, Eingabe oder Formel?
Gruß
Peter
Gruß
Nepumuk
ohne makro geht es hier noch einfacher:
markiere die relevante Spalte (hier C) und gehe auf Daten -> Fiter -> Autofilter.
Jetzt ist ein Drop-Down-Menue-Button eingefügt worden. Hier wählst Du jetzt: "Benutzerdefiniert". Inerhalb des Menues das auftaucht ist standardmäßig "entspricht" eingestellt, er würde also, wenn Du im Feld rechts daneben die 0 als Kriterium wählst alle Nullen anzeigen, aber den Rest nicht. Hier wählst Du also "entspricht nicht" und im Feld daneben die 0.
Fertig.
Gruß von Axel
Sub Zeilen_ausblenden()Code eingefügt mit Syntaxhighlighter 1.14
Application.ScreenUpdating = False
Sheets("Tabelle1").Activate
Dim Zelle As Excel.Range
Set Bereich = Sheets("Tabelle1").Range("c5:c104")
For Each Zelle In Bereich
If Zelle = 0 Then
Rows(Zelle.Row).Hidden = True
End If
Next
Application.ScreenUpdating = True
End Sub