Supportnet / Forum / Tabellenkalkulation

Hallo alle zusammen, In D2 soll beim öffnen der Tabelle immer das aktuelle Datum angezeigt werden. heute() Wenn aber in D14 etwas eingetragen wird und die Tabelle abgespeichert wird und nun irgenwann wieder geöffnet wird, dann soll das Datum in D2 nicht mehr geändert werden. Dort soll dann immer das alte Datum stehen bleiben. Auch wenn jetzt wieder etwas in D14 geändert wird. Danke für die Hilfe Gruß Marco

Tach auch.

Meisnt du das so:
=WENN(D2 = "";JETZT();"in d2 steht was")
Heißt soviel wie:
WEnn D2 leer ist, dann soll da das aktuelle Datum stehen, sonst steht da in dem Fall "in de2 steht was".

Hallo,

ich meine das was @cox will ist nur mit einem Makro oder VBA zu lösen.

Werd mir mal Gedanken machen

Gruß

Helmut

Nicht ganz.

Ich möchte das gerne so haben.

Wenn ich die Tabelle öffne soll in D2 das aktuelle Datum eingefügt werden

(D14 ist zu diesem Zeitpunkt noch leer.)

Nun trage ich etwas in meine Tabelle ein.
In D14 wird auch etwas eingetragen.

Die Tabelle wird abgespeichert. Fertig

Wenn ich die Tabelle nun an einem anderem Tag wieder öffne steht ja was in D14, also soll in D2 wo das Datum drinnen steht, das Datum nicht mehr geändert werden.
Es soll nun immer das Datum drinnen bleiben als ich die Tabelle das erste mal abgepeichert habe.

Gruß
Marco

Hallo alle zusammen.

Weiß wirklich keiner eine Lösung?

Gruß
Marco

Hallo,

es geht nur mit VBA,

beim öffnen der Datei muss geprüft werden ob in Zelle D14 ein Wert steht. Wenn die Zelle leer ist in Zelle D2 das Tagesdatum einzutragen.

Eine Frage bleibt noch, wird der Eintrag in D14 irgendwann gelöscht, soll das eingetragene Datum in D2 dann ersetzt werden oder erhalten bleiben?

Leider habe ich im Moment nicht die Zeit eine Lösung fertigzumachen, bin aber dabei.

Gruß

Helmut

Hi Marco,

kopiere nachfolgenden Code in das VBA Projekt "DieseArbeitsmappe".

Private Sub Workbook_Open()
If IsEmpty(Range("D14")) Then Range("D2") = Format(CDate(Now), "dd.mm.yyyy")
End Sub

Der Code schreibt Dir beim Öffnen der Datei das aktuelle Datum in Zelle D2. Aber nur so lange, wie D14 leer ist.

Ich hoffe, Dir hilft´s.

MfG,
coros
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein}
^{Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

Ja vielen Dank.

Genau das brauchte ich.


Danke, Danke, Danke


Gruß
Marco

Hi cos,

schön, dass Du mit der Lösung etwas anfangen konntest. Danke Dir auch für die Rückmeldung.

MfG,
coros
^{Jeder macht was er will, keiner macht was er soll, aber alle machen mit.}

So doch noch was.

das funzt jetzt nur mit der ersten Tabelle.
ich habe aber mehrer.

Name der Tabellen
4 Starter (erste)
5 Starter
6 Starter
usw. bis 9 Starter

Marco

Hallo,

müsste auch bei den anderen Tabellen funktionieren. Zweite Tabelle zur Ersten aufmachen und sehen ob Makro da ist

Gruß

Helmut

Hi Marco,

dann muss man halt den Blattnamen vor die Rangeanwweisung setzen. Das sieht dann folgendermaßen aus:

Private Sub Workbook_Open()
If IsEmpty(Sheets("4 Starter").Range("D14")) Then Sheets("4 Starter").Range("D2") = Format(CDate(Now), "dd.mm.yyyy")
If IsEmpty(Sheets("5 Starter").Range("D14")) Then Sheets("5 Starter").Range("D2") = Format(CDate(Now), "dd.mm.yyyy")
If IsEmpty(Sheets("6 Starter").Range("D14")) Then Sheets("6 Starter").Range("D2") = Format(CDate(Now), "dd.mm.yyyy")
If IsEmpty(Sheets("7 Starter").Range("D14")) Then Sheets("7 Starter").Range("D2") = Format(CDate(Now), "dd.mm.yyyy")
If IsEmpty(Sheets("8 Starter").Range("D14")) Then Sheets("8 Starter").Range("D2") = Format(CDate(Now), "dd.mm.yyyy")
If IsEmpty(Sheets("9 Starter").Range("D14")) Then Sheets("9 Starter").Range("D2") = Format(CDate(Now), "dd.mm.yyyy")
End Sub

MfG,
coros
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein}
^{Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

AHHHHH,

so geht das.
War also auf dem richtigen weg.
Langsam weiß ich wieder wie der Hase läuft.

Nochmals vielen Dank


Gruß
Marco

• EXCEL-Formel?
• Datumsformel wenn leer, dann nicht 1900 anzeigen
• wenn dann formel
• Datum aus php mit Datum aus sql vergleichen