Zeit und Datums-Befehle   →   ohne Beispiele
Befehl / Beispiele	Beschreibung
Date	Beinhaltet das aktuelle Datum
Beispiel :         Msgbox Date
Datediff(<Zeitparameter>,<1. Datum>,<2. Datum>)	Berechnet Zeitdifferenzen je nach Zeitparameter
Beispiel :   MsgBox DateDiff("d", Date, #12/21/2012#)            ' --> Tagesdifferenz MsgBox DateDiff("d", #11/30/2009#, #12/31/2012#)    ' --> 476
DatePart(<Zeitparameter>,<Datum>)	Gibt den Zeitraum eines Datums an ( mögliche Zeitparameter siehe oben )
Beispiel :   MsgBox DatePart("d", #11/30/2009#)     ' -->  30 ( Tag des Monats      ) MsgBox DatePart("m", #11/30/2009#)     ' -->  11 ( Monat des Jahres    ) MsgBox DatePart("w", #11/30/2009#)     ' -->   2 ( Wochentag der Woche ) MsgBox DatePart("ww", #11/30/2009#)    ' -->  49 ( Woche des Jahres    ) MsgBox DatePart("q", #11/30/2009#)     ' -->   4 ( Quartal des Jahres  )
DateSerial(<Jahr>,<Monat>,<Tag>)	Setzt ein Datum aus  Tag, Monat und Jahr zusammen.
Beispiel :   Tag = 12 Monat = 11 Jahr = 2010 Datum = DateSerial(Jahr, Monat, Tag)   ' -->  12.11.2010
DateValue(<Datum als Textangabe>)	Verwandelt eine Datumsangabe, welche als Text vorliegt,  in ein Datumswert.
Beispiel :   MsgBox DateValue("30. Dezember 2010")  ' -->  30.12.2010 MsgBox DateValue("30 Dezember 2010")   ' -->  30.12.2010 MsgBox DateValue("30 Dez 2010")        ' -->  30.12.2010 MsgBox DateValue("30/12/2010")         ' -->  30.12.2010 MsgBox DateValue("12/30/2010")         ' -->  30.12.2010 MsgBox DateValue("30.12.2010")         ' -->  30.12.2010
Day(<Datum>)	Gibt den Tag eines Datums wieder
Beispiel :   MsgBox Day(#12/31/2010#)               ' -->  31
Hour(<Zeit>)	Gibt die Stunde einer Zeitangabe wieder.
Beispiel :   Zeit = "13:36:25" MsgBox Hour(Zeit)                      ' --> 13
Minute(<Zeit>)	Gibt die Minute einer Zeitangabe wieder.
Beispiel :   Zeit = "13:36:25" MsgBox Minute(Zeit)                    ' --> 36
Month(<Datum>)	Gibt die Monatzahl einer Zeitangabe wieder.
Beispiel :   Datum = #12/21/2012# MsgBox Month(Datum)                    ' --> 12
MonthName(<Monatszahl>)	Gibt den Monatsnamen einer Datumsangabe wieder.
Beispiel :   Datum = #12/21/2012# MsgBox MonthName(Month(Datum))         ' --> Dezember
Now	Gibt das aktuelle Datum und die aktuelle Zeit aus.
Beispiel :   MsgBox Now                            ' --> aktulle Zeit im Format TT.MM.JJJJ hh:mm:ss
Second(<Zeit>)	Gibt die Sekunde einer Zeitangabe wieder.
Beispiel :   Zeit = "13:36:25" MsgBox Second(Zeit)                    ' --> 25
Time	Gibt die aktuelle Zeit aus.
Beispiel :   MsgBox Time                            ' --> Ausgabe der Zeit im Format hh:mm:ss
Timer	Gibt die Sekunden seit Mitternacht aus
Beispiel :   MsgBox Timer                   ' --> Anzahl der Sekunden seit Mitternacht im Format s,00
TimeSerial(<Stunden>, <Minuten>, <Sekunden>)	Gibt die Zeit nach Angaben von Stunden, Minuten und Sekunden wieder.
Beispiel :   Stunden = 12 Minuten = 45 Sekunden = 3 MsgBox TimeSerial(Stunden, Minuten, Sekunden) ' --> 12:45:03
TimeValue(<Zeitangabe als Text>)	Verwandelt eine Text-Zeitangabe in eine Zeitangabe
Beispiel :   MsgBox TimeValue("13:54")              ' --> 13:54:00 MsgBox TimeValue("1:54pm")             ' --> 13:54:00 MsgBox TimeValue("1:54PM")             ' --> 13:54:00 MsgBox TimeValue("1:54 AM")            ' --> 01:54:00
Weekday(<Datum>,<1. Tag der Woche>)	Gibt den Wochentag als Zahl aus
Beispiel :   MsgBox Weekday(#12/21/2012#, vbMonday) ' --> 5 ( also ein Freitag )
WeekdayName(<Datum>, [<Kurzform>], <1. Kalendertag>)	Gibt den Wochentagsnamen einer Wochentagszahl aus.
Beispiel :   MsgBox WeekdayName(Weekday(#12/21/2012#, vbMonday), , vbMonday)           ' --> Freitag MsgBox WeekdayName(Weekday(#12/21/2012#, vbMonday), True, vbMonday)       ' --> Fr MsgBox WeekdayName(Weekday(#12/21/2012#, vbMonday), False, vbMonday)      ' --> Freitag
Year	Gibt das Jahr eines Datums als Zahl aus.
Beispiel :   MsgBox Year(#12/31/2012#)              ' --> 12