✅ VBA DateSerial-Funktion

Inhaltsverzeichnis

DatumSerienbezeichnung

Gibt ein Datum mit einem Wert für Jahr, Monat und Tag zurück.

Hier ist ein einfaches DateSerial-Beispiel:

123	Sub DateSerial_Example()MsgBox DateSerial(2019, 4, 1)End Sub

Dieser Code gibt den 01.04.2019 zurück.

Im VBA-Editor können Sie „DateSerial(“ eingeben, um die Syntax für die DateSerial-Funktion anzuzeigen:

Die DateSerial-Funktion enthält 3 Argumente:

Jahr:Ganzzahliger Wert zwischen 100 und 9999 oder ein numerischer Ausdruck

Monat:Integer Wert. Beliebiger numerischer Ausdruck.

Tag:Integer Wert. Beliebiger numerischer Ausdruck.

1	MsgBox DateSerial(2019, 40, 1)

Ergebnis: 01.04.2022

Anhand des obigen Beispiels können wir sehen, dass der 40. Monat der April 2022 ist, beginnend im Januar 2022.

1	MsgBox DateSerial(2019, -5, 10)

Ergebnis: 10.07.2018

1	MsgBox DateSerial(2019, -5, -10)

Ergebnis: 20.06.2018