我有运行特定代码的 VBA 代码,我试图通过使用以下行为其提供 3 秒的等待时间来暂停下一次执行:
Application.Wait (Now + TimeValue("00:00:03"))
Run Code Online (Sandbox Code Playgroud)
但我收到以下错误:
错误:未找到方法或数据变量
最好在开发代码时使用外部库引用(早期绑定)。早期绑定具有智能感知和帮助文档的优点。早期绑定的一个主要缺点是,如果安装了不同版本的库,它需要更新引用。这是最好在分发之前删除外部引用并将代码转换为后期绑定的方式。
后期绑定用于CreateObject导入和实例化类对象。
CreateObject("Excel.Application").Wait (Now + TimeValue("00:00:05"))
Run Code Online (Sandbox Code Playgroud)
或者,您可以引用 WinApiSleep函数。
Private Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)
Run Code Online (Sandbox Code Playgroud)
用法:
Sleep 3000 '3000 Milliseconds = 3 second delay
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
6782 次 |
| 最近记录: |