Umwandlung Zahl in Datum

[SG05]

Hallo zusammen,

ich möchte ein Feld, dass aus einem anderen System kommt und folgenden Wert hat: 31082017

in ein Datum umwandeln. Diese erreiche ich mit:

Datum: ZDate(Links([MeinFeld];2) & "." & Rechts(Links([MeinFeld];4);2) & "." & Rechts([MeinFeld];4))

Nun ist der Wert am ersten September: 1092017

Wie muss ich meine Abfrage ändern, wenn nur sieben statt acht Zahlen im Feld sind?

Danke für Eure Hilfe.

[MzKlMu]

Hallo,

1092017

Ist der Monat immer 2 stellig ?

[Lachtaube]

Du solltest den importierten Wert, wenn Du ihn nicht gleich in ein Datum umwandest (warum eigentlich nicht?), zumindest in einem Textfeld abspeichern, das auch führende Nullen (0) speichert.

PS: ich würde das Problem auch arithmetisch lösen. Aus dem VBA-Direktbereich:

Code [Auswählen] Erweitern

dt = 1092017
y = dt Mod 10000
m = (dt Mod 1000000) \ 10000
d = dt \ 1000000
?DateSerial(y, m, d)
01.09.2017

dt = 31082017
y = dt Mod 10000
m = (dt Mod 1000000) \ 10000
d = dt \ 1000000
?DateSerial(y, m, d)
31.08.2017

[SG05]

Ja, der Monat ist immer zweistellig.
Nur die ersten neun Tage kommen einstellig....

[MzKlMu]

Hallo,
von Lachtaube gibt es doch die Lösung, nicht gesehen ?