函数VBA：Now

描述

VBA Now 函数返回当前系统日期和时间。

语法 Now

现在

示例 VBA Now

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

Sub NowExample1()

    Range("A1") = Now
    
End Sub

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

Sub NowExample2()

    MsgBox Format(Now, "d mmmm yyyy hh:nn") '返回，例如：2 November 2020 13:08
    
End Sub

仅当至少 17:00 并且是工作日时，我们才会执行该操作：

Sub NowExample3()

    If Hour(Now) >= 17 And Weekday(Now, vbMonday) < 6 Then
        MsgBox "一天的工作日快结束了！"
    End If
    
End Sub