vba 怎么停止application.wait

Application.Wait
方法
暂停运行宏，直到一特定时间才可继续执行。如果到达指定时间，则该值为
True。
语法

表达式.Wait(Time)

表达式 一个代表 Application 对象的变量。

参数

名称

必选/可选

数据类型

说明

Time
必选
Variant
希望宏继续执行的时间（以 Microsoft Excel
日期格式表示）。

返回值
Boolean

说明

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

示例

本示例暂停一个正在执行的宏，到今天下午 6:23 时才可继续执行。

Visual Basic for Applications

Application.Wait "18:23:00"

本示例暂停一个正在执行的宏约 10 秒钟。

Visual Basic for Applications

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

本示例显示一条消息，用以表明是否经过 10 秒钟。

Visual Basic for Applications

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

温馨提示：答案为网友推荐，仅供参考

当前网址：https://verywind.cn/ee/e7r27jfferx3eyv77y.html