請教板上各為高手,
如果要用excel抓取網路即時資料,跨隔日的要如何製作??謝謝
要從下午1點到次日2點,是這樣寫嗎?
Sub ()
Set MyBook = ThisWorkbook
Set Sht1 = MyBook.Sheets("Sheet1")
If Now >= (Today() + 0 + TimeValue("13:00:00")) And Now <= (Today() + 1 + TimeValue("02:00:10")) Then
End If
End Sub
我看不懂你所謂的「即時」資料和「跨隔日」的意思
時間範圍是「資料」的時間範圍還是「執行程式」的時間範圍
以下是兩個時間點(當日13:00及次日02:00)的產生方式供參考
另外
先前的問題如果已解決了
請選個最佳解答以結案
一般比較不能設計成所謂的「跨隔日」
一律都要依當日來判斷。
所以依照你的需求就是兩個時間區段。
一個是 00:00:00 ~ 02:00:00 。這個區段抓到的日期,要扣1天。
再來就是 13:00:00 ~ 23:59:59 。
這段時間的日期依當日計算。