Festes Datum, wenn Bedingung erfüllt
01.08.2017 14:54:58
Nico
ich habe folgendes Problem.
In meiner Tabelle ist die Spalte B erstmal leer. Wenn dort ein Wert eingetragen wird, soll in der Spalte Q (bzw. nur in der entspr. Zeile) automatisch das aktuelle Datum erscheinen, was sich aber nicht automatisch aktualisieren soll (es sei denn der Eintrag in spalte B wird geändert).
Meine ursprüngliche Idee, mit "Heute" (Bsp. aus Q1407 =WENN(B1407="";"";HEUTE())) zu arbeiten geht also leider nicht und eine andere Formel scheint es auch nicht zu geben...
Also habe ich mich mal mit Makros versucht, bekomme sie aber einfach nicht zusammen... Laut Microsoft wäre die beste Abhilfe hier, ein Makro was die Formel durch fixe Werte ersetzt und folgenderm. aussieht:
Sub Erstelldatum_einfügen()
ActiveCell.Formula = "=TODAY()"
Selection.Copy
Selection.PasteSpecial Paste:=xlValues Application.CutCopyMode = False
End Sub
Das funktioniert bei mir aber nicht (Fehlermeldung in der letzten Zeilevor End Sub ). Außerdem habe ich noch versucht, einzubauen, dass das Makro automatisch läuft, wenn die Excel-Datei geschlossen wird, und man es nicht manuell starten muss.
Kann mir von euch jemand sagen, wie der VBA-Code lauten müsste, damit das für mein Tabellenblatt funktioniert?
Velen Dank!
Nico
Anzeige