excel - 如何在VBA中管理编译错误

Question

我有一个excel宏，并且此变量在Sub()中声明:

Dim ACAD As AcadApplication

而且，如果计算机没有AutoCAD，则会出现编译错误。然后，我想做的就是管理此错误，以便向用户显示一条消息，例如:

MsgBox "You have to install AutoCAD 2013 or later", vbCritical, "APPLICATION ERROR"

我已经搜索了很长时间没有答案。也许我没有正确使用关键词。

谁能帮我？

Answer 1

您可以使用create object而不是添加引用并使用dim对其进行声明
以下是和示例

    On Error Goto AppNotfound 
    Set Web = CreateObject("InternetExplorer.Application")
    On Error Goto 0
    'Your Code here
    Exit Sub
    AppNotfound:
Msgbox("You have to install AutoCAD 2013 or later")

Exit Sub
End Sub