在网页启动之前，VBA代码不应继续进行

Question

您对以下代码有任何替代方法：

Do While IeNav.readyState <> READYSTATE_COMPLETE
     DoEvents
Loop

由于这种情况正在发生，我的vba代码正在向前推进而没有完全启动网页，导致运行时错误。如果您有任何建议，请帮助我

Answer 1

您可以使用Application.Wait代替DoEvents。

Do While IeNav.readyState <> READYSTATE_COMPLETE
    Application.Wait Now + TimeValue("0:00:01")
Loop

如果您继续使用Application.Wait，您可能希望check the remarks on MSDN关于它，因为它可能会在运行时禁用某些用法。