Fonction VBA : Date

Description

La fonction VBA Date renvoie la date système actuelle.

Syntaxe Date

Date

Exemple VBA Date

Stockons la date renvoyée par la fonction Date dans la cellule A1 :

Sub DateExample1()

    Range("A1") = Date
    
End Sub

Affichons la date renvoyée par la fonction Date au format texte :

Sub DateExample2()

    MsgBox Format(Date, "d mmmm yyyy") 'Retours, par exemple : 2 novembre 2020
    
End Sub

Nous effectuerons l'action uniquement si la date renvoyée par la fonction Date correspond au premier jour du mois :

Sub DateExample3()

    If Day(Date) = 1 Then
        MsgBox "C'est le premier jour du mois !"
    End If
    
End Sub