Application.OnTime 方法 (Excel)

安排一個程序在將來的特定時間執行 (既可為某個日期的指定時間,也可為指定的時間之後)。

語法

運算式OnTime (EarliestTimeProcedureLatestTimeSchedule)

expression 代表 Application 物件的變數。

參數

名稱 必要/選用 資料類型 描述
EarliestTime 必要 Variant 想要執行程序的時間。
Procedure 必要 String 要執行的程序名稱。
LatestTime 選用 Variant 可以開始執行程序的最晚時間。 例如,如果 LatestTime 設定為 EarliestTime + 30,而 Microsoft Excel 在 EarliestTime 不在 Ready、Copy、Cut 或 Find 模式中,因為有另一個程式正在執行,Excel 將會等候 30 秒,讓第一個程式完成。 如果 Excel 在 30 秒內未處於就緒模式,則不會執行程式。 如果省略此引數,Excel 會等到程式可以執行為止。
Schedule 選用 Variant 若為 True ,排程新的 OnTime 程序。 若為 False ,清除先前設定的程序。 預設值為 True

註解

使用 Now + TimeValue(time) 來排程從現在算起 (計算的特定時間量) 執行的專案。 使用 TimeValue(time) 可安排某個程序只執行指定的時間。

EarliestTime的值會四捨五入到最接近的秒。

[排程]設定為[False] 以清除先前以相同 Procedure 和EarliestTime值設定的程式

Procedure 必須沒有引數並不會在自訂類別或表單中宣告。

範例

此範例 會在 15 秒後my_Procedure執行。

Application.OnTime Now + TimeValue("00:00:15"), "my_Procedure"

此範例 會my_Procedure 下午 5 點執行。

Application.OnTime TimeValue("17:00:00"), "my_Procedure"

本範例會取消前一個範例對 OnTime 的設定。

Application.OnTime EarliestTime:=TimeValue("17:00:00"), _ 
 Procedure:="my_Procedure", Schedule:=False

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應