函数VBA：Date

描述

VBA Date 函数返回当前系统日期。

语法 Date

Data

示例 VBA Date

让我们将 Date 函数返回的日期存储在单元格 A1 中：

Sub DateExample1()

    Range("A1") = Date
    
End Sub

让我们以文本格式显示 Date 函数返回的日期：

Sub DateExample2()

    MsgBox Format(Date, "d mmmm yyyy") '返回，例如：2 November 2020
    
End Sub

仅当 Date 函数返回的日期对应于该月的第一天时，我们才会执行该操作：

Sub DateExample3()

    If Day(Date) = 1 Then
        MsgBox "这是这个月的第一天！"
    End If
    
End Sub