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
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