Supportnet / Forum / Tabellenkalkulation
Zeile Wertabhängig ausblenden
Frage
Hallo,
in der Zellen der Spalte D ist immer die gleiche Formel. Hier Beispiel aus Zeile 64: D64 =WENN(B64>0;A64;0)
Nun sollen per Schaltfläche alle Zeilen in denen der D-Wert 0 ist ausgeblendet werden.
Hoffentlich könnt Ihr mir helfen.
Gruß m-o-m
Antwort 1 von Saarbauer
Hallo,
da keine Angaben zur Excelversion, setze ich 2000 voraus. Dort kann man unter "Extras""Optionen""Ansicht"Nullwerte ein Häckchen rausnehmen, dann werden grundsätzlich keine Nullwerte angezeigt.
Falls die Lösung nicht gewünscht, kann man unter "Format" "Bedingte Formaierung" "Zellwert ist" "gleich" 0 und dann "Format " die Schrift auf Hintergrundfarbe einstellen (z.B. weisse Schrift auf weissem Grund)
Gruß
Helmut
da keine Angaben zur Excelversion, setze ich 2000 voraus. Dort kann man unter "Extras""Optionen""Ansicht"Nullwerte ein Häckchen rausnehmen, dann werden grundsätzlich keine Nullwerte angezeigt.
Falls die Lösung nicht gewünscht, kann man unter "Format" "Bedingte Formaierung" "Zellwert ist" "gleich" 0 und dann "Format " die Schrift auf Hintergrundfarbe einstellen (z.B. weisse Schrift auf weissem Grund)
Gruß
Helmut
Antwort 2 von m-o-m
Hallo Helmut,
soweit schon richtig.
Excel ist 2000.
Mit den ausgeblendeten Nullwerten und der bed. Formatierung habe ich aber immer noch die Zeilenhöhe.
Hintergrund zur Frage:
Zeile 18-69 werden ausgefühlt, wenn zwischendurch leere Zeilen sind sieht das nicht wirklich gut aus. Und da ich diese Tabelle 40-Mal habe scheidet auch ein manuelles ausblenden der Zeilen aus.
Deshalb bin ich ja auf die Abhängigkeit zum Nullwert gekommen.
Gruß m-o-m
soweit schon richtig.
Excel ist 2000.
Mit den ausgeblendeten Nullwerten und der bed. Formatierung habe ich aber immer noch die Zeilenhöhe.
Hintergrund zur Frage:
Zeile 18-69 werden ausgefühlt, wenn zwischendurch leere Zeilen sind sieht das nicht wirklich gut aus. Und da ich diese Tabelle 40-Mal habe scheidet auch ein manuelles ausblenden der Zeilen aus.
Deshalb bin ich ja auf die Abhängigkeit zum Nullwert gekommen.
Gruß m-o-m
Antwort 3 von Event
Hallo m-o-m
Hier eine Lösung mit einen ToggleButton:
Ich hoffe Du kommst klar damit...
Gruß
Hier eine Lösung mit einen ToggleButton:
Option Explicit
Private Sub ToggleButton1_Click()
Dim Bereich As Range, Zelle
Set Bereich = Range(Cells(1, 4), "D" & UsedRange.SpecialCells(xlCellTypeLastCell).Row)
If ToggleButton1.Value = True Then
For Each Zelle In Bereich
If Zelle.Value = "0" Then Zelle.EntireRow.Hidden = True
Next
Else
Range("D:D").EntireRow.Hidden = False
End If
End Sub
Ich hoffe Du kommst klar damit...
Gruß
Antwort 4 von Event
Nachtrag
Alternativ ginge das auch über einen Autofilter für Spalte D, Benutzerdefiniert " entspricht nicht 0 "
Alternativ ginge das auch über einen Autofilter für Spalte D, Benutzerdefiniert " entspricht nicht 0 "
Antwort 5 von Saarbauer
Hallo,
hier wurde von dir und mir "ausblenden" unterschiedlich interpretiert, aber mit der Lösung von @ Event wird es wohl so wie du es dir vorstellst
Gruß
Helmut
hier wurde von dir und mir "ausblenden" unterschiedlich interpretiert, aber mit der Lösung von @ Event wird es wohl so wie du es dir vorstellst
Gruß
Helmut
Antwort 6 von Petra1205
Hallo zusammen,
ich stöbere ganz gerne hier im Supportnet und möchte - mal wieder - ein herzliches "Dankeschön" an all diejenigen loswerden, die hier ihr Wissen zur Verfügung stellen.
Momentan habe ich zwar kein aktuelles "Anliegen", aber durch die Antwort von Event schon wieder etwas gelernt. Danke!
Gibt es denn in dem benutzerdefinierten Autofilter unter "entspricht nicht" auch eine Möglichkeit " mehr als 2 Kriterien einzugeben?
Viele Grüße
Petra
ich stöbere ganz gerne hier im Supportnet und möchte - mal wieder - ein herzliches "Dankeschön" an all diejenigen loswerden, die hier ihr Wissen zur Verfügung stellen.
Momentan habe ich zwar kein aktuelles "Anliegen", aber durch die Antwort von Event schon wieder etwas gelernt. Danke!
Gibt es denn in dem benutzerdefinierten Autofilter unter "entspricht nicht" auch eine Möglichkeit " mehr als 2 Kriterien einzugeben?
Viele Grüße
Petra