Funkcja VBA Date zwraca bieżącą datę systemową.
Data
Zapiszmy datę zwróconą przez funkcję Date w komórce A1:
Sub DateExample1() Range("A1") = Date End Sub
Wyświetlmy datę zwróconą przez funkcję Date w formacie tekstowym:
Sub DateExample2() MsgBox Format(Date, "d mmmm yyyy") 'Zwroty np.: 2 listopada 2020 End Sub
Akcję wykonamy tylko jeśli data zwrócona przez funkcję Date będzie odpowiadać pierwszemu dniu miesiąca:
Sub DateExample3() If Day(Date) = 1 Then MsgBox "To pierwszy dzień miesiąca!" End If End Sub