VBA Now 当前日期与时间
返回系统当前日期与时间。
语法
Property Now As Variant
示例
Sub sub3()
Dim d1 As Date
'返回系统当前日期与时间
d1 = Now
Debug.Print d1
Debug.Print "年:" & Year(d1) & ",月:" & Month(d1)
Debug.Print "小时:" & Hour(d1) & ",分:" & Minute(d1)
End Sub
运行结果：
2023/6/15 16:35:55
年:2023,月:6
小时:16,分:35