Wie erhalte ich das aktuelle datum und die aktuelle uhrzeit?
In diesem Tutorial lernen wir verschiedene Möglichkeiten kennen, das heutige Datum und die aktuelle Uhrzeit mithilfe von VBA-Code abzurufen.
Das heutige Datum in VBA
In VBA gibt es eine Funktion namens „ DATE “, mit der Sie das aktuelle Datum ermitteln können. Wenn Sie diese Funktion wie im folgenden Beispiel verwenden, wird das aktuelle Datum basierend auf der Systemdatumseinstellung zurückgegeben.
Sub myMacro() Range("A1") = Date End Sub
Wenn Sie diesen Code ausführen , gibt er das aktuelle Datum in Zelle A1 ein und verwendet das aktuelle Datumsformat, das Sie in Excel haben.
Sie können diese Funktion auch verwenden, um das heutige Datum in einem Nachrichtenfeld abzurufen, genau wie den folgenden Code.
Sub myMacro() MsgBox Date End Sub
Das heutige Datum und die aktuelle Uhrzeit
Ebenso gibt es eine Funktion namens „ NOW “, mit der Sie das heutige Datum und die aktuelle Uhrzeit abrufen können. Wie Sie sehen können, haben wir es im folgenden Code verwendet, um das aktuelle Datum und die aktuelle Uhrzeit in Zelle A1 abzurufen.
Sub myMacro() Range("A1") = Now End Sub
Aktuelle Stunde
Wenn Sie nun statt Datum und Uhrzeit nur die aktuelle Uhrzeit erhalten möchten, müssen Sie neben der Funktion „Jetzt“ eine weitere Funktion „Format“ ( mehr über diese Funktion können Sie hier lesen ) verwenden.
Im obigen Code haben wir die Funktion „Jetzt“ verwendet, um den Wert der Formatfunktion bereitzustellen, und dann ein Format nur für die Zeit verwendet.
Sub myMacro() Range("A1") = Format( Now , "HH:MM Am/Pm") End Sub
Ändern des Formats des heutigen Datums (Beispiel: JJJJMMTT)
Sie können die Formatfunktion auch verwenden, um das Format des aktuellen Datums zu ändern. Im folgenden Code haben wir die Formatfunktion verwendet und das Format als „JJJJMMTT“ angegeben.
Sub myMacro() Range ("A1"). Value = Format ( Date , "YYYY/MM/DD") End Sub
Hinweis: Im obigen Code haben wir die Eigenschaft value verwendet, um das Datum in Zelle A1 einzugeben.