Funcția VBA: Date

Descriere

Funcția VBA Date returnează data curentă a sistemului.

Sintaxă Date

Date

Exemplu VBA Date

Să stocăm data returnată de funcția Date în celula A1:

Sub DateExample1()

    Range("A1") = Date
    
End Sub

Să afișăm data returnată de funcția Date în format text:

Sub DateExample2()

    MsgBox Format(Date, "d mmmm yyyy") 'Returnări, de exemplu: 2 noiembrie 2020
    
End Sub

Vom efectua acțiunea numai dacă data returnată de funcția Date corespunde cu prima zi a lunii:

Sub DateExample3()

    If Day(Date) = 1 Then
        MsgBox "Este prima zi a lunii!"
    End If
    
End Sub