Funktion VBA: Now

Beschreibung

Die Funktion VBA Now gibt das aktuelle Systemdatum und die aktuelle Systemzeit zurück.

Syntax Now

Now

Beispiel VBA Now

Speichern wir das von der Funktion Now zurückgegebene Datum in Zelle A1:

Sub NowExample1()

    Range("A1") = Now
    
End Sub

Lassen Sie uns das von der Funktion Now zurückgegebene Datum im Textformat anzeigen:

Sub NowExample2()

    MsgBox Format(Now, "d mmmm yyyy hh:nn") 'Retouren, zum Beispiel: 2. November 2020 13:08 Uhr
    
End Sub

Wir werden die Aktion nur durchführen, wenn es mindestens 17:00 Uhr und ein Wochentag ist:

Sub NowExample3()

    If Hour(Now) >= 17 And Weekday(Now, vbMonday) < 6 Then
        MsgBox "Der Arbeitstag ist fast vorbei!"
    End If
    
End Sub