建議金字塔增加Application.OnTime功能

作者：金字塔來源：cxh99.com 發(fā)布時間：2021年01月16日

咨詢內(nèi)容： 請教：建議金字塔增加Application.OnTime功能，方便VBA程序降低系統(tǒng)消耗，每隔一定時間運(yùn)行一次軟件。目前金字塔只有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ū)別呢
?
用戶回復(fù)： 區(qū)別是：計時起點(diǎn)不一樣。計時器是從程序啟動開始計時，比如計時器是5秒，然后執(zhí)行一次代碼，如果這段代碼運(yùn)行的時間是3秒，下一次執(zhí)行就是2秒以后。而Application.OnTime函數(shù)，Application.OnTime?Now?+?TimeValue("00:00:05"),?"my_macro"?設(shè)定的是在這段代碼完成后，比如在目前時間基礎(chǔ)上增加5秒鐘，5秒到了之后再開始運(yùn)行代碼。計時器是一開始程序就運(yùn)行著，始終沒有停止過。而Application.OnTime函數(shù)是到了時間才運(yùn)行。我的理解是這樣的，不知是否正確。