Übersicht der Datumsfunktionen

Auf dieser Seite werden drei Möglichkeiten zum Füllen einer Datumsvariablen beschrieben:

Außerdem enthält sie Links zu Seiten, die alle Arten von Datumsfunktionen im Zusammenhang mit Berechnungen abdecken:

Tag & Woche Monat Quartal Jahr
Tag der Woche - 1 = Sonntag Erster Tag im Monat Erster Tag im Quartal Jahr - ab Datum
Name der WocheTag oder Abkürzungen Letzter Tag im Monat Letzter Tag im Quartal Ist Schaltjahr
Heute, Gestern, Morgen Tag im Monat Erster Monat im Quartal Anzahl der Tage im Jahr
Nächster und vorheriger Tag Monat - Nummer Letzter Monat im Quartal Erster Tag im Jahr
Name des Monats Letzter Tag im Jahr

Einstellung von Datumswerten

Syntax der Datumskonstante verwenden

Sie können feste Datumsangaben in Ihrem VBA-Code verwenden, indem Sie das Datum zwischen # # einfügen, wie unten dargestellt.


Const cdtMyDate As Date = #12/31/2024#

Datum aus Jahr, Monat und Tag erstellen - DateSerial

Die Funktion DateSerial füllt eine Datumsvariable aus Jahr, Monat und Tag - siehe Code unten.


Dim iYear As Integer: iYear =
Dim iMonth As Integer: iMonth =
Dim iDay As Integer: iDay =
Dim dt As Date
dt = DateSerial(Year:=iYear, Month:=iMonth, Day:=iDay)

String in Datum umwandeln - DateValue

Die Funktion DateValue wandelt eine Zeichenkette in ein Datum um. Der folgende Code interpretiert die Zeichenfolge als 2/12/2025.


Dim strDate As String: strDate = "February 12, 2025"
Dim dt As Date
dt = DateValue(strDate)
Hinweis
  • DateValue erkennt die Reihenfolge von Monat, Tag und Jahr entsprechend dem Kurzdatumsformat, das Sie für Ihr System festgelegt haben. DateValue erkennt auch eindeutige Datumsangaben, die Monatsnamen enthalten, entweder in langer oder abgekürzter Form. So erkennt DateValue zum Beispiel nicht nur den 30.12.1991 und den 30.12.91, sondern auch den 30.12.1991 und den 30.12.1991.
  • Wenn die Jahresangabe weggelassen wird, verwendet DateValue das aktuelle Jahr aus dem Systemdatum Ihres Computers.
  • Wenn DateValue die Zeichenfolge nicht in ein Datum auflösen kann Laufzeitfehler '13': Typ-Fehlanpassung aufgetreten

Die folgende Abbildung zeigt die Unterstützung des Code VBA Add-Ins für VBA Date-Prozeduren.

Unterstützung für VBA Date-Prozeduren