我正在为Word在VBA中编写一些代码,以便将用户重定向到链接,或者在不使用是/否框的情况下关闭窗口。问题是,如果用户不想继续链接,代码会给出一个错误424: Object required。
Set objShell = CreateObject("Wscript.Shell")
intMessage = MsgBox("Would you like to read about alternatives to these words?", vbYesNo, "Access Denied")
If intMessage = vbYes Then
objShell.Run ("LINK")
Else
Wscript.Quit
End If
当我调试错误时,error 424突出显示'Wscript.Quit'。我该如何解决这个问题?
谢谢!
发布于 2018-06-07 04:37:39
WScript
是一个VBScript对象。您正在编写VBA代码。完全删除该指令,WScript
是未定义的,没有任何意义。
你得到这个错误是因为,在你的代码中,WScript
是一个Variant/Empty
,只是因为你的模块顶部缺少了Option Explicit
,这使得VBA代码可以编译和运行,而不需要验证每个变量都被正确声明了(这意味着拼写错误也很好地编译和运行)-换句话说,它是一个未声明的变量,因为你在它上进行了一个成员调用,按照VBA语法,这只能是一个对象……除了它不是,因此是“需要对象”。
将所有变量远程instruction.
Option Explicit
到module
Dim
语句。https://stackoverflow.com/questions/50728970
复制相似问题