Función VBA: Date

Descripción

La función VBA Date devuelve la fecha actual del sistema.

Sintaxis Date

Date

Ejemplo VBA Date

Guardemos la fecha devuelta por la función Date en la celda A1:

Sub DateExample1()

    Range("A1") = Date
    
End Sub

Mostremos la fecha devuelta por la función Date en formato de texto:

Sub DateExample2()

    MsgBox Format(Date, "d mmmm yyyy") 'Devoluciones, por ejemplo: 2 noviembre 2020
    
End Sub

Realizaremos la acción solo si la fecha devuelta por la función Date corresponde al primer día del mes:

Sub DateExample3()

    If Day(Date) = 1 Then
        MsgBox "¡Es el primer día del mes!"
    End If
    
End Sub