我有一個從公司網站提取歷史資料的宏。我注意到,當有人拉出尚未發生的時間時,整個工具的邏輯就會中斷(例如,為明天的班次拉取資料,今天)。
任何人都有某種 if 陳述句的示例,可以確保時間實際上是過去的。而且他們不是時間旅行。
uj5u.com熱心網友回復:
您可以將日期與 =NOW() 進行比較
Sub mysub()
Dim CurrentDate As Date
CurrentDate = Now()
Dim iYear As Integer: iYear = 2035
Dim iMonth As Integer: iMonth = 10
Dim iDay As Integer: iDay = 25
Dim dt As Date
dt = DateSerial(Year:=iYear, Month:=iMonth, Day:=iDay)
If dt > CurrentDate Then
MsgBox ("dt is in the future")
End If
End Sub
轉載請註明出處,本文鏈接:https://www.uj5u.com/net/494193.html
上一篇:在d3.js問題中決議時間戳
