共用方式為


Word) (Application.OnTime 方法

啟動背景計時器,以便在指定的時間執行巨集。

語法

expressionOnTime( _When_ , _Name_ , _Tolerance_ )

需要 expression。 代表 Application 物件的變數。

參數

名稱 必要/選用 資料類型 描述
When 必要 Variant 要執行巨集的時間。
Name 必要 String 要執行的巨集名稱。
Tolerance 選用 Variant 巨集若未在 When 指定的時間內執行,可延後執行的最長時間 (以秒為單位),之後巨集將被取消。 巨集可能不會每次都在指定的時間執行。 例如,如果正在進行排序作業,或正在顯示對話方塊,巨集將會延遲直到 Word 完成工作為止。 如果這個引數為 0 (零) 或予以省略,則不論 When 所指定的時間已超過多久,都會執行巨集。

註解

When 參數可以是指定時間 (例如 或 "16:30") 的字串, "4:30 pm" 也可以是TimeValueTimeSerial (等函式所傳回的序號,例如 或 TimeValue("2:30 pm")TimeSerial(14, 30, 00)) 。 例如,您也可以包含日期 (或 "6/30 4:15 pm"TimeValue("6/30 4:15 pm")) 。

針對 Name 參數,請使用完整的宏路徑來確保正確宏執行 (例如, "Project.Module1.Macro1") 。 若要執行巨集、 文件或範本必須可同時 OnTime 指令執行的時間及時間時所指定的時間會進入。 此原因而最好 Normal.dot 或另一個會自動載入全域範本中儲存巨集。

設定指定的量的時間執行陳述式之後執行巨集計時器使用 現在 函數和 TimeValueTimeSerial 函數的傳回值的總和。 例如,使用 Now+TimeValue("00:05:30") 5 分鐘 30 秒執行陳述式之後執行巨集。

Word 可維持只有一個背景計時器 OnTime 來設定。 如果您啟動另一個計時器現有計時器執行前,現有計時器會取消此事件。

範例

這則範例會在下午 3:55 執行目前模組中名為 "Macro1" 的巨集。

Application.OnTime When:="15:55:00", Name:="Macro1"

這則範例會在執行範例 15 秒後執行名為 "Macro1" 的巨集。 巨集名稱包括專案和模組名稱。

Application.OnTime When:=Now + TimeValue("00:00:15"), _ 
 Name:="Project1.Module1.Macro1"

這則範例會在下午 1:30 執行名為 "Start" 的巨集。巨集名稱包括專案和模組名稱。

Application.OnTime When:=TimeValue("1:30 pm"), _ 
 Name:="VBAProj.Module1.Start"

另請參閱

Application 物件

支援和意見反應

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