Application.Wait 方法 (Excel)

暫停執行巨集，直到指定時間為止。 如果到達指定時間，則傳回 True。

語法

expression.Wait (Time)

expression 代表 Application 物件的變數。

參數

名稱	必要/選用	資料類型	描述
Time	必要	Variant	想繼續執行巨集的時間 (以 Microsoft Excel 日期格式)。

傳回值

布林值

註解

Wait 方法暫停 Microsoft Excel 的所有作業，並且 Wait 起作用時可能禁止您對電腦做其他作業。 不過，背景處理序如列印和重新計算將可繼續進行。

範例

本範例會將一個執行中的巨集暫停到當日下午 6:23 後。

Application.Wait "18:23:00"

此範例會將執行中的巨集暫停約 10 秒。

newHour = Hour(Now()) 
newMinute = Minute(Now()) 
newSecond = Second(Now()) + 10 
waitTime = TimeSerial(newHour, newMinute, newSecond) 
Application.Wait waitTime

本範例會顯示一個指出是否已經過了 10 秒的訊息。

If Application.Wait(Now + TimeValue("0:00:10")) Then 
 MsgBox "Time expired" 
End If

支援和意見反應

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