VBA – Datum-Variable

Written by

Editorial Team

Reviewed by

Steve Rynearson

Translated by

Zakarya El Oirzadi

Last updated on Januar 17, 2022

Was Variablen, Datentypen und Konstanten sind, haben wir bereits in unserem VBA-Tutorial Datentypen – Variablen und Konstanten behandelt. In diesem Tutorial werden wir uns damit beschäftigen, wie man eine Variable als Datum deklariert.

In VBA wird der Datentyp Datum als Dezimalzahl gespeichert. Sowohl Datums- als auch Zeitangaben können in diesem Datentyp gespeichert werden. Der VBA-Datumsdatentyp kann Werte zwischen dem 1. Januar 100 und dem 31. Dezember 9999 speichern.

VBA-Datum-Variable

Sie deklarieren eine Variable als Datum mit dem Schlüsselwort Dim:

Dim datumEins As Date

Dann können Sie der Datum-Variablen ein Datum zuweisen. Es gibt mehrere Möglichkeiten, Datumsangaben für die Zuweisung an Variablen zu erzeugen:

Das heutige Datum einer Variablen zuweisen

Die Funktion Date gibt das heutige Datum zurück:

Dim dtHeute

dtHeute = Date

Die aktuelle Uhrzeit einer Variablen zuweisen

Die Funktion Now gibt das heutige Datum und die aktuelle Uhrzeit zurück:

Dim dJetzt

dJetzt = Now

Zuweisung der aktuellen Uhrzeit einer Variablen

Die Funktion Time gibt die aktuelle Uhrzeit zurück:

Dim tUnrzeit 

tUnrzeit = Time

Zuweisung eines Datums einer Variablen mit DateSerial

Die Funktion DateSerial gibt ein Datum zurück, das auf einer Eingabe von Jahr, Monat und Tag basiert:

Dim dsDatum 

dsDatum = DateSerial(2010, 11, 11)

Zuweisung einer Uhrzeit einer Variablen mit TimeSerial

Die Funktion TimeSerial gibt eine Uhrzeit zurück, die auf der Eingabe von Stunde, Minute und Sekunde basiert:

Dim tsUhrzeit

tsUhrzeit = TimeSerial (10, 10, 45)

Wenn Sie Datumsangaben in Ihrem Code verwenden, müssen Sie diese mit einem # oder „, wie unten gezeigt, einschließen:

VBA-Funktion DateValue

Die VBA-Funktion DateValue kann verwendet werden, um ein Datum zu initialisieren. Der folgende Code kann verwendet werden, um ein Datum in VBA zu initialisieren:

MsgBox DateValue("1/1/2010")

VBA-Funktion TimeValue

Die Funktion TimeValue erzeugt eine Uhrzeit:

MsgBox TimeValue("21:30:57")

Excel VBA – Beispiel für Datum-Variable

Diese Prozedur demonstriert, wie man Datum-Variablen erstellt, ihnen Werte zuweist und sie in einem Excel-Arbeitsblatt ausgibt:

Sub EineVariableAlsDatumDeklarieren()

Dim datumEins As Date
Dim datumZwei As Date


datumEins = #1/1/2019#
datumZwei = "1/2/2019"

Range("A1").Value = datumEins
Range("A2").Value = datumZwei

End Sub

Das Ergebnis ist:

vba datum variable deklarieren

Mehr über Datumsfunktionen erfahren Sie in diesem Turorial.

VBA-Datum-Variable in Access

Die Datum-Variable funktioniert in Access-VBA genau so wie in Excel-VBA.

Diese Prozedur demonstriert, wie man eine Datum-Variable erstellt und ein Feld in einer Access-Tabelle mit dem Wert aktualisiert.

Sub EineVariableAlsDatumDeklarieren()
   Dim dtWork As Date
   dtWork = #05/10/2020#
   DoCmd.RunSql "UPDATE tblJobs SET WorkDate = #" & dtWork & "# WHERE JobNo = 6"
 End Sub
vba-free-addin

Add-In für VBA-Code-Beispiele

Auf alle Code-Beispiele aus unserer Website einfach zugreifen.

Navigieren Sie einfach zum Menü, klicken Sie darauf und der Code wird direkt in Ihr Modul eingefügt. .xlam add-in.

(Keine Installation erforderlich!)

Kostenloser Download

Return to VBA Code Examples