Question

我在公司中使用了3年相同的启动画面用户表单，但今天它开始出现Method 'Wait' of object '_Application' failed错误。我假设这与新的Microsoft共享点有关（以前我们以前是通过云使用内部共享点）

我尝试搜索SO，但没有完全相同的内容。（即：Method 'VBE' of object '_Application' failed）

我尝试删除多余的括号，但是没有更改...

我正在考虑添加On Error语句，但是如果我的启动屏幕没有弹出，为什么会有这个代码和用户表单？所以说实话，我希望有一个真正的解决方案，而不是On Error声明。

Application.Wait (Now + TimeValue("00:00:01"))
SplashUserForm.Label1.Caption = "Opening..."
SplashUserForm.Repaint
Application.Wait (Now + TimeValue("00:00:01"))
Unload SplashUserForm
Application.OnKey "{F7}", "showContains"

*关于Application.Wait (Now + TimeValue("00:00:01"))

的错误马上出现

更新

在检查Stax' suggestion as per his comment之后，一旦我用Application更改了CreateObject("Excel.Application")对象，这解决了第一个问题，即Wait方法。但是下一行OnKey方法不适用于CreateObject("Excel.Application")。

Answer 1

您可以使用Application.ScreenUpdating = False，它会更快。

Excel VBA：对象“ _Application”的方法“等待”失败

1 个答案: