Supportnet / Forum / Datenbanken
VBA Datum Format wandeln
Frage
Hallo,
ich gebe in einem Textfeld in einem Formular das Datum ein.
In VBA brauche ich aber nun das amerikanische Format für meine Filter im Bericht.
[b]Wie kann ich das am schnellsten umwandeln?
z.B. 1.6.2006 zu #06/01/2006# wandeln[/b]
Gruß
Gudrun
Antwort 1 von erik
Mit der BuildCriteria-Funktion.
MsgBox BuildCriteria("Feldname", dbDate, Date())
MsgBox BuildCriteria("Feldname", dbDate, Date())
Antwort 2 von gudrun11
Danke Erik für den Hinweis,
ich hatte schon mit Stringfunktionen herumgebastelt, aber so ist es natürlich eleganter.
So sieht es jetzt bei mir aus:
MyDateStr = BuildCriteria("KSTVonDatum", dbDate, KSTVonDatum.Value)
Pos = InStr(MyDateStr, "=")
MyDateStr = Mid(MyDateStr, Pos + 1)
Viele Grüße
Gudrun
ich hatte schon mit Stringfunktionen herumgebastelt, aber so ist es natürlich eleganter.
So sieht es jetzt bei mir aus:
MyDateStr = BuildCriteria("KSTVonDatum", dbDate, KSTVonDatum.Value)
Pos = InStr(MyDateStr, "=")
MyDateStr = Mid(MyDateStr, Pos + 1)
Viele Grüße
Gudrun