建議金字塔增加Application.OnTime功能
作者：金字塔 來源：cxh99.com 發(fā)布時間：2021年01月16日
-
咨詢內容：
請教：建議金字塔增加Application.OnTime功能，方便VBA程序降低系統(tǒng)消耗，每隔一定時間運行一次軟件。目前金字塔只有Application.setTimer
Sub?macro_timer()
'Tells?Excel?when?to?next?run?the?macro.
Application.OnTime?Now?+?TimeValue("00:00:1"),?"my_macro"
End?Sub
Sub?my_macro()
'Macro?code?that?you?want?to?run.
MsgBox?"This?is?my?sample?macro?output."
'Calls?the?timer?macro?so?it?can?be?run?again?at?the?next?interval.
Call?macro_timer
End?Sub
?
?來源: CXH99.COM
-
金字塔客服：
這個和計時器有啥區(qū)別呢
?
-
用戶回復：
區(qū)別是：計時起點不一樣。計時器是從程序啟動開始計時，比如計時器是5秒，然后執(zhí)行一次代碼，如果這段代碼運行的時間是3秒，下一次執(zhí)行就是2秒以后。而Application.OnTime函數(shù)，Application.OnTime?Now?+?TimeValue("00:00:05"),?"my_macro"?設定的是在這段代碼完成后，比如在目前時間基礎上增加5秒鐘，5秒到了之后再開始運行代碼。計時器是一開始程序就運行著，始終沒有停止過。而Application.OnTime函數(shù)是到了時間才運行。我的理解是這樣的，不知是否正確。
打印本文
關閉窗口