Excel VBA教程:Wait方法

暂停运行宏,直到一特定时间才可继续执行。如果到达指定时间,则该值为 True。

要点   Wait方法暂停 Microsoft Excel 的所有操作,并且,Wait 起作用时可能禁止您对计算机做其他操作。不过,后台操作(如打印和重新计算)将继续进行。

expression.Wait(Time)

expression   必需。该表达式返回一个 Application对象。

Time   Variant 类型,必需。想要宏重新继续执行的时间点,以 Microsoft Excel 日期格式表示。

Excel VBA教程: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

上页:Excel VBA教程:Volatile方法 下页:Excel VBA教程:WebPagePreview方法

Excel VBA教程:Wait方法

Excel VBA教程:WebPagePreview方法 Excel VBA教程:XYGroups方法
Excel VBA教程:ZOrder方法 Excel VBA教程:AddIn对象
Excel VBA教程:AddIns集合对象 Excel VBA教程:Adjustments对象
Excel VBA教程:AllowEditRange对象 Excel VBA教程:AllowEditRanges集合
Excel VBA教程:Application对象 Excel VBA教程:Areas集合
Excel VBA教程:AutoCorrect对象 Excel VBA教程:AutoFilter对象
Excel VBA教程:AutoRecover对象 Excel VBA教程:Axes集合对象
Excel VBA教程:Axis对象 Excel VBA教程:AxisTitle对象
Excel VBA教程:Border对象 Excel VBA教程:Borders集合
Excel VBA教程:CalculatedFields集合对象 Excel VBA教程:CalculatedItems集合对象
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号