Office: (Office 2013) Code unterscheidet manuell eingetragenes Datum von VBA-Eintrag

Hallo ihr da draußen,

ich habe einen kleinen VBA-Code, mit dem ich ein Datum (17.05.2020) in Zelle J20 eintrage und darunter bis Zeile J30 immer einen Tag weiter (18.05.2020, 19.05.2020 usw.)

Code:

Leider wird statt des gewünschten Ergebnisses folgende in die Zellen geschrieben: 13.11.66, 14.11.66 usw.

Entferne ich im VBA-Code die Zeile

Code:

und gebe in Zelle J20 das Datum manuell ein, dann ist das gewünschte Ergebnis zu sehen.

Kann mir hierzu bitte jemand helfen?

Gruß, Michael

:)

 

Datumswerte bitte also solche behandeln und nicht als Text:
Code:

ohne Schleife:
Code:

 

Vielen Dank!
Darauf kann ich aufbauen!

Ich schließe das Thema.

Michael

 

Hallo,

ich muss leider doch noch einmal etwas nachfragen:

Kann ich den Datumswert auch optional gestalten?

Ich würde gerne den Wert aus einer TextBox als Start-Datum nehmen:

Code:

Leider kommt jetzt die Meldung, dass DateSerial nicht optional ist.

Könnte mir hierzu bitte noch einmal jemand helfen.

Dankeschön!

PS: Bei mir kann es zurzeit zu 2-3Tagen Verzug bezüglich einer Rückantwort kommen.

 

Dir fehlt schlicht die Angabe eines erforderlichen Parameters.

https://docs.microsoft.com/de-de/off...erial-function

DateSerial(Wert1, Wert2, Wert3)

 

Wenn man Fehlermeldungen genau liest, hilft das in der Regel weiter.

Vielleicht hilft dir DateValue weiter?

Man muss bei solchen TEXT(!)Boxen immer aufpassen wie ein Luchs, dass wirklich ein korrekt interpretierbares Datum (=ZAHL!) eingegeben wird. Das geht in viel zu vielen Fällen schief.

 

Hallo,

hier eine Funktion, wie man hinreichend eine Datumseingabe überprüfen könnte:
https://www.ms-office-forum.net/foru...84&postcount=8

Ulrich