VBA 延时 3 秒：使用 Sleep 或 Application.Wait 函数

在 VBA 中，可以使用 Sleep 函数或 Application.Wait 函数来实现延时。

使用 Sleep 函数：

Sleep 函数需要传入一个参数，表示要延时的毫秒数。例如，要延时 3 秒，可以使用以下代码：

Sub Delay()
    Application.Wait (Now + TimeValue('0:00:03'))
End Sub

使用 Application.Wait 函数：

Application.Wait 函数可以等待指定的时间。Now 函数返回当前时间，TimeValue 函数将字符串转换为时间值，这里将字符串 '0:00:03' 转换为 3 秒的时间值。将这两个值相加，就得到了延时结束的时间点。

注意：

• Sleep 函数会阻塞当前线程，无法执行其他代码，而 Application.Wait 函数则可以执行其他代码。
• 延时时间以毫秒为单位。