I want to refresh my data automatically at 12am every day. does
something like this make sence?
Public RunWhen As Double
Sub StartTimer()RunWhen = Time() = #12:00:00 AM# TimeSerial(24, 0, 0)
Application.OnTime earliesttime:=RunWhen, procedu=quot;The_Subquot;, _
schedule:=True
End SubSub The_Sub()ActiveWorkbook.RefreshAll
StartTimerEnd Sub
something like this make sence?
Public RunWhen As Double
Sub StartTimer()RunWhen = Time() = #12:00:00 AM# TimeSerial(24, 0, 0)
Application.OnTime earliesttime:=RunWhen, procedu=quot;The_Subquot;, _
schedule:=True
End SubSub The_Sub()ActiveWorkbook.RefreshAll
StartTimerEnd Sub
文章標籤
全站熱搜
