文章介紹了excel中vba日期函數和vba時間函數的應用以及相關的函數列表。
第一，vba日期和時間函數的基本用法
Excel中vba日期函數和時間函數分別是DATE和TIME。
VBA提供了三個無參數函數：Date、Time、Now，分別返回當前電腦系統的日期、時間、日期+時間。
下面的代碼我們以三個消息框來結合日期和時間函數，分別提示當前的日期、時間。
Sub vba時間和日期函數()
MsgBox Date
MsgBox Time
MsgBox Now
End Sub
第二，使用vba日期和時間函數修改系統信息
下面這段代碼將電腦右下角的日期和時間修改為2011年1月1日21:50:00。
Sub 修改時間和日期()
Time = "21:50:00"
Date = "2011年1月1日"
End Sub
第三，用消息框返回當前日期的年、月、日和當前時間的時、分、秒
Sub SmpYearHour()
‘以對話框顯示當前日期的年、月、日
MsgBox "當前日期：" & Date & Chr(10) & _
"年：" & Year(Date) & Chr(10) & _
"月：" & Month(Date) & Chr(10) & _
"日：" & Day(Date)
‘以對話框顯示當前時間的時、分、秒
MsgBox "當前時間：" & Time & Chr(10) & _
"時：" & Hour(Time) & Chr(10) & _
"分：" & Minute(Time) & Chr(10) & _
"秒：" & Second(Time)
End Sub
第四，其余的vba日期和時間函數列表
Timer：返回一個 Single，代表從午夜開始到現在經過的秒數。
TimeSerial(hour, minute, second)：返回一個 Variant (Date)，包含具有具體時、分、秒的時間。
DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]]) 返回 Variant (Long) 的值，表示兩個指定日期間的時間間隔數目。
Second(time) 返回一個 Variant (Integer)，其值為 0 到 59 之間的整數，表示一分鐘之中的某個秒。
Minute(time) 返回一個 Variant (Integer)，其值為 0 到 59 之間的整數，表示一小時中的某分鐘。
Hour(time) 返回一個 Variant (Integer)，其值為 0 到 23 之間的整數，表示一天之中的某一鐘點。
Day(date)返回一個 Variant (Integer)，其值為 1 到 31 之間的整數，表示一個月中的某一日。
Month(date) 返回一個 Variant (Integer)，其值為 1 到 12 之間的整數，表示一年中的某月。
Year(date) 返回 Variant (Integer)，包含表示年份的整數。
Weekday(date, [firstdayofweek]) 返回一個 Variant (Integer)，包含一個整數，代表某個日期是星期幾。
