SLa*_*aks 20
VBA没有Sleep功能.
您可以从Kernel32.dll导入它,如下所示:
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Run Code Online (Sandbox Code Playgroud)
请注意,这将冻结应用程序.
您也可以拨打DoEvents一个While循环,这不会冻结的应用程序.
我尝试过的所有东西似乎都挂起了应用程序,包括Application.Wait.这似乎工作:
waitTill = Now() + TimeValue("00:15:00")
While Now() < waitTill
DoEvents
Wend
Run Code Online (Sandbox Code Playgroud)
您还可以暂停当前的宏上下文,Application.Wait T但不会阻止整个过程.