Leere Zellen mit 0 füllen
17.06.2020 15:57:42
Martin
Hallo zusammen,
ich habe eine Arbeitsmappe, in der über SAP Analysis Daten gezogen werden. Es geht hierbei um Monatswerte.
Teilweise kommt es vor, dass in einem Monat kein Wert eingetragen ist.
Ich benötige in einem solchen Fall eine "0" in der Zelle.
Von Hand eintragen scheidet aus, da die Tabelle mehrfach täglich aktualisiert wird und händische Eintragungen überschrieben werden.
Gibt es hier die Möglichkeit mit VBA zu arbeiten?Kenne mich hier leider nicht sehr gut aus..
Ich habe nur folgenden Code probiert, das funktioniert auch, aber sobald ich die Daten aktualisiere, sind die Nullen wieder weg und ich muss das VBA erneut von Hand ausführen.
Option Explicit
Public Sub test()
Dim zelle As Range
For Each zelle In Range("C5:S13")
If Trim(zelle.Value) = "" Then zelle.Value = 0
Next
End Sub
Mir würde es auch ausreichen, wenn ich der nachfolgenden Berechnungsformel suggerieren kann, dass eine leere Zelle "Null" bedeutet.
Danke schonmal
Gruß Martin
Hallo Martin,
nur eine Zeile
Range("C5:S13").SpecialCells(xlCellTypeBlanks) = 0
Hallo Hajo,
Wo muss ich das eintragen?
VBA ist noch Neuland für mich.
Habe das jetzt in den Code der Tabelle eingetragen aber hier passiert nichts.
Gruß Martin
Halo Martin,
deine Code durch meinen ersetzen
also nach Zeile
Sub und vor End Sub
Hallo Hajo,
habe es gerade probiert.
Nach Start des Makro sind die Nullen drin.
Nachdem ich die Daten aktualisiere, sind die Nullen wieder weg...
Hallo Martin,
in meiner Datei nicht.
Zu Deiner Datei kann ich nichts schreiben, was wohl daran liegt das ich nicht auf fremde Rechner schaue.Ich baue keine Datei nach.
Sollte die Datei verlinkt werden?
Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten
http://www.ms-office-forum.de/forum/showthread.php?t=322895
änderrn.
Bilder lade ich mir nicht runter, da Excel damit nichts anfangen kann.
http://www.excel-ist-sexy.de/bilder-statt-datei/
Hochgeladene Bilder können zwar als solche in Excel importiert werden, sind jedoch bei der Lösung von Problemen nicht sehr hilfreich, da man die eigentlichen Daten nicht ohne große und zeitraubende Umwege direkt in die Tabelle übertragen kann.
Das ist nur meine Meinung zu dem Thema.
Gruß Hajo
o.T.
Hi
Excel interpretiert leere Zellen als 0.
problematisch sind Zellen, die den Text Leerstring enthalten.
diese sehen zwar leer aus, sind es aber nicht sondern enthalten einen Text.
solche Zellen entstehen, wenn man eine Formel die das Ergebnis "" hat kopiert und als Wert einfügt.
oder bei Importen.
wenn du die Liste Importierst, ist eigentlich logisch dass vorhandene Werte bei jedem Import überschrieben werden.
Dh das Makro muss nach jedem Import neu ausgeführt werden.
um das zu automatisieren kann man ggf die Events Change- oder Calculate verwenden.
ansonsten: zeig mal eine deine Auswerteformeln, dann kann man mal schauen, wie man die umbauen muss dass sie die "Leerzellen" verarbeiten können.
Gruß Daniel
Hallo Daniel,
ich habe im Prinzip 12 Monatsspalten, in die durch SAP Analysis Monatswerte geschrieben werden.
In der folgenden Spalte errechne ich einen Koeffizienten mit folgender Formel:
"=WENNFEHLER(WURZEL(VARIANZEN(F2:K13))/MITTELWERT(F2:K13);0)"
Also was ganz banales.
Falls in einem Monat jedoch kein Wert enthalten ist, wird durch dieses SAP-Analysis jedoch keine NULL eingetragen, sondern die Zelle bleibt leer.
Die Berechnung ist dann natürlich falsch.
Erst wenn ich händisch eine NULL eintrage, stimmt die Berechnung wieder.
Sobald ich jedoch die Daten aktualisiere, sind die händisch eingetragenen Nullen wieder weg.
HI
prüf mal, ob die Berechnung mit VarianzenA und MittelwertA besser funktioniert.
hier werden Texte als 0 gewertet.
solltest du echte Leerzellen haben, die auch von MittelwertA ignoriert werden, könntest du Mittelwert durch Summe/AnzahlZellen ersetzen.
also statt Mittelwert(F2:K13) dann Summe(F2:K13)/72
bzw wenns dynamisch sein soll:
Summe(F2:K13)/(Zeilen(F2:K13)*Spalten(F2:K13))
obs bei Varianzen eine ähnliche alternativberechnung gibt, weiß ich nicht, da ich diese Funktion nicht kenne.
Gruß Daniel
Hallo Daniel,
ich wollte mich nur vor Anwendung der HasFormula-Eigenschaft kurz damit beschäftigen und hatte in einer leeren Arbeitsmappe herumgetestet. Natürlich war ich anfangs sehr verwundert, dass die Beschreibung der Funktion und die Rückgabewerte überhaupt nicht gepasst haben.
Mein Beitrag war auch weniger als Frage gemeint, sondern als "Seht euch das mal an"-Hinweis.
Viele Grüße
Martin
Hallo Daniel,
hier hat sich offenbar ein anderer Martin im Beitrag vertan :)
Danke für deine Rückmeldung, ich werde diese Formeln morgen mal ausprobieren.
Aktuell habe ich es mit einem aufgezeichneten Makro gelöst, welches über einen Button auslöst. Hier werden alle Leerzellen im Bereich markiert und mit einer Null gefüllt.
Als provisorische Lösung funktioniert das erstmal.
Etwas in der Art benötige ich nur als VBA-Sequenz, so dass nach jeder Datenaktualisierung automatisch die Nullen eingetragen werden.
Gruß Martin
HI
dann prüf mal, ob mit der Aktualisierung das Change- oder Calculate-Event des Tabellenblatts ausgelöst wird.
falls ja, kannst du deinen Code dann darüber ausführen lassen.
Gruß Daniel
Hallo Daniel,
hier hat sich offenbar ein anderer Martin im Beitrag vertan :)
Danke für deine Rückmeldung, ich werde diese Formeln morgen mal ausprobieren.
Aktuell habe ich es mit einem aufgezeichneten Makro gelöst, welches über einen Button auslöst. Hier werden alle Leerzellen im Bereich markiert und mit einer Null gefüllt.
Als provisorische Lösung funktioniert das erstmal.
Etwas in der Art benötige ich nur als VBA-Sequenz, so dass nach jeder Datenaktualisierung automatisch die Nullen eingetragen werden.
Gruß Martin