Функция VBA: Date

Описание

Функция VBA Date возвращает текущую системную дату.

Синтаксис Date

Date

Пример VBA Date

Сохраним дату, возвращаемую функцией Date, в ячейке A1:

Sub DateExample1()

     Range("A1") = Дата
    
End Sub

Отразим дату, возвращаемую функцией Date, в текстовом формате:

Sub DateExample2()

     MsgBox Format(Date, "d mmmm yyyy") 'Возвращает, например: 2 ноября 2020
    
End Sub

Выполним действие, только если дата, возвращаемая функцией Date, соответствует первому дню месяца:

Sub DateExample3()

     If Day(Date) = 1 Then
         MsgBox "Это первый день месяца!"
     End If
    
End Sub