安排一個程序在將來的特定時間執行 (既可為某個日期的指定時間，也可為指定的時間之後)。
語法
運算式。OnTime (EarliestTime、 Procedure、 LatestTime、 Schedule)
expression 代表 Application 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| EarliestTime | 必要 | Variant | 想要執行程序的時間。 |
| Procedure | 必要 | String | 要執行的程序名稱。 |
| LatestTime | 選用 | Variant | 可以開始執行程序的最晚時間。 例如，如果 LatestTime 設定為 EarliestTime + 30，而 Microsoft Excel 在 EarliestTime 未處於就緒、複製、剪下或尋找模式，因為另一個程序正在執行，Excel 會等候 30 秒，讓第一個程序完成。 如果 Excel 未在 30 秒內處於就緒模式，將不會執行此程序。 如果省略此引數，Excel 會等到程序可以執行為止。 |
| Schedule | 選用 | Variant | 若為 True ，排程新的 OnTime 程序。 若為 False ，清除先前設定的程序。 預設值為 True。 |
註解
Now + TimeValue(time)用來排程在經過從現在起計算的特定時間量後執行某項目 () 。 使用 TimeValue(time) 可安排某個程序只執行指定的時間。
EarliestTime 的值會四捨五入到最接近的秒。
將 排程 設定為 False 以清除先前使用相同 Procedure 和 EarliestTime 值設定的程序。
Procedure 必須沒有引數並不會在自訂類別或表單中宣告。
範例
此範例從現在開始執行 my_Procedure 15 秒後。
Application.OnTime Now + TimeValue("00:00:15"), "my_Procedure"
此範例在下午 5 點 my_Procedure 運行。
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 支援與意見反應。