La funzione VBA Date restituisce la data di sistema corrente.
Date
Memorizziamo la data restituita dalla funzione Date nella cella A1:
Sub DateExample1()
Range("A1") = Date
End Sub
Visualizziamo la data restituita dalla funzione Date in formato testo:
Sub DateExample2()
MsgBox Format(Date, "d mmmm yyyy") 'Resi, ad esempio: 2 novembre 2020
End Sub
Eseguiremo l'azione solo se la data restituita dalla funzione Date corrisponde al primo giorno del mese:
Sub DateExample3()
If Day(Date) = 1 Then
MsgBox "È il primo giorno del mese!"
End If
End Sub