Supportnet / Forum / Tabellenkalkulation
Zelleninhalt löschen wenn Wert 0 ist
Frage
Hallo,
ich brauch Eure Hilfe!!!
Hab eine große Tabelle wo im Bereich H9 bis Du 1000 Werte drin stehen. Die Ersten Spalten stehen keine Werte sondern nur so was wie Name usw.
Mein Problem ist folgendes: in dem Weterbereich H9 bis DU 1000 sind auch Zellen deren Werte inhalt =0 sit, wo auch eien 0 eingetragen ist. Ist es irgendwie möglich, das überall inden Zellen des Wertebereiches eine 0 steht, das die 0 gelöscht wird und die Zelle leer bleibt??
Vielen Dank für Eure Mühe!!!!!!!!
Gruß
Elhamplo
Antwort 1 von trudi1
Hallo Elhamplo,
das einfachste ist über bearbeiten->ersetzen zu gehen.
Dabei trägst du dann unter suchen die Null ein unter ersetzen nichts.
Über alle Ersetzen kannst du dann die Nullen löschen...
Ein Problemm gibt es hierbei allerdings: enthält eine andere Zahl ebenfalls einen Null wird die auch gelöscht!
Gruß
Trudi
das einfachste ist über bearbeiten->ersetzen zu gehen.
Dabei trägst du dann unter suchen die Null ein unter ersetzen nichts.
Über alle Ersetzen kannst du dann die Nullen löschen...
Ein Problemm gibt es hierbei allerdings: enthält eine andere Zahl ebenfalls einen Null wird die auch gelöscht!
Gruß
Trudi
Antwort 2 von Elhamplo
Hallo,
danke für den Tipp.
Bei der Datenmenge wäre es vielleicht mit Hilfe eines VBA Codes einfacher. So müsste ich jeden Wert kontrollieren.
Gruß
Elhamplo
danke für den Tipp.
Bei der Datenmenge wäre es vielleicht mit Hilfe eines VBA Codes einfacher. So müsste ich jeden Wert kontrollieren.
Gruß
Elhamplo
Antwort 3 von CaroS
Hallo Elhamplo,
das Ersetzen aus AW1 mach mal besser nicht, warum hat Trudi ja selbst geschrieben, nur dass die Folgen noch ein klein wenig schlimmer wären, wenn Du nicht höllisch aufpasst. Auch in sämtlichen Formeln würden die Nullen ersetzt werden, und ob Deine Tabelle dann noch brauchbar ist, kannst Du Dir ja mal überlegen.
Versuch mal was anderes, kostet Dich (hin und zurück zusammen) ca 45 Sekunden.
Menü Extras -- Optionen... -- Register Ansicht -- Abschnitt Fensteroptionen -- Häkchen bei Nullwerte entfernen (oder wieder setzen) -- OK.
Und, wie sieht Dein Bereich H9:DU 1000 jetzt aus? Besser?
Gruß,
CaroS
das Ersetzen aus AW1 mach mal besser nicht, warum hat Trudi ja selbst geschrieben, nur dass die Folgen noch ein klein wenig schlimmer wären, wenn Du nicht höllisch aufpasst. Auch in sämtlichen Formeln würden die Nullen ersetzt werden, und ob Deine Tabelle dann noch brauchbar ist, kannst Du Dir ja mal überlegen.
Versuch mal was anderes, kostet Dich (hin und zurück zusammen) ca 45 Sekunden.
Menü Extras -- Optionen... -- Register Ansicht -- Abschnitt Fensteroptionen -- Häkchen bei Nullwerte entfernen (oder wieder setzen) -- OK.
Und, wie sieht Dein Bereich H9:DU 1000 jetzt aus? Besser?
Gruß,
CaroS
Antwort 4 von Elhamplo
Hallo CoroS,
hab das mal versucht. Das Problem dabei ist, der Errechnung des Druchschnittes wir nicht verändert. Die nullen sind zwar optisch weg aber in der Zelle steht noch die 0. So wird aber mein durchschnitt verfälscht.
Gruß
Elhamplo
hab das mal versucht. Das Problem dabei ist, der Errechnung des Druchschnittes wir nicht verändert. Die nullen sind zwar optisch weg aber in der Zelle steht noch die 0. So wird aber mein durchschnitt verfälscht.
Gruß
Elhamplo
Antwort 5 von JoeKe
Moin Elhamplo,
wenn es dir nur um die Berechnung des Mittelwertes ohne Null geht, kannst du das mit folgender Formel machen:
=SUMME(A1:A10)/SUMMENPRODUKT((A1:A10<>0)*1)
Der Teil
Gruß
JöKe
wenn es dir nur um die Berechnung des Mittelwertes ohne Null geht, kannst du das mit folgender Formel machen:
=SUMME(A1:A10)/SUMMENPRODUKT((A1:A10<>0)*1)
Der Teil
SUMMENPRODUKT((A1:A10<>0)*1)Gruß
JöKe
Antwort 6 von Saarbauer
Hallo,
wie wäre es mit der Lösung:
=SUMME(H9:DU1000)/ZÄHLENWENN(H9:DU1000;">0")
Gruß
Helmut
wie wäre es mit der Lösung:
=SUMME(H9:DU1000)/ZÄHLENWENN(H9:DU1000;">0")
Gruß
Helmut
Antwort 7 von JoeKe
Hallo,
falls die Nullen unbedingt weg sollen, dann so:
Option Explicit
Sub Nullweg()
Dim rng As Range
For Each rng In Range("H9:DU1000")
If rng.Value = 0 Then rng.ClearContents
Next
End Sub
Gruß
JöKe
falls die Nullen unbedingt weg sollen, dann so:
Option Explicit
Sub Nullweg()
Dim rng As Range
For Each rng In Range("H9:DU1000")
If rng.Value = 0 Then rng.ClearContents
Next
End Sub
Gruß
JöKe
Antwort 8 von Elhamplo
Hallo JöKe,
vielebn dank für den Code. Sowas brauchte ich.
Vielen vielen Dank!!!!
@Saarbauer
Vielen Dank für Deine Mühe!!
So mit der Formel hätte ich mir direckt am Anfang überlegen sollen. Bei nächsten mal werde ich so was berücksichtigen..
Ich danke Euch!!!!!!!
Gruß
Elhamplo
vielebn dank für den Code. Sowas brauchte ich.
Vielen vielen Dank!!!!
@Saarbauer
Vielen Dank für Deine Mühe!!
So mit der Formel hätte ich mir direckt am Anfang überlegen sollen. Bei nächsten mal werde ich so was berücksichtigen..
Ich danke Euch!!!!!!!
Gruß
Elhamplo
Antwort 9 von Saarbauer
Hallo @Elhamplo,
geht mir auch manchmal so, man sieht den Wald vor lauter Bäumen nicht
Gruß
Helmut
geht mir auch manchmal so, man sieht den Wald vor lauter Bäumen nicht
Gruß
Helmut