excel - 在VBA中处理错误时如何管理无错误情况？

Question

这个问题已经有答案了:

Why VBA goes to error handling code when there is no error? (5 个回答)

已关闭 去年。

我需要使用 GoTo 捕获一些 VBA 错误声明:

Sub mySub
 On Error GoTo errorHandler:
    Workbooks.Open("myWorkbook")
'
' Some Code
'
errorHandler:
MsgBox "ERROR"

End Sub

问题是，当没有错误时 errorHandler部分已执行。
我发现this discussion但答案并没有解决我的问题。
我尝试添加 Exit Sub声明如下:

Sub mySub
 On Error GoTo errorHandler:
    Workbooks.Open("myWorkbook")
    Exit Sub

'
' Some Code
'
errorHandler:
  MsgBox "ERROR"

End Sub

在这种情况下，如果没有错误，它就会退出该方法。我也尝试过:

 Sub mySub
 On Error GoTo errorHandler:
    Workbooks.Open("myWorkbook")
'
' Some Code
'
errorHandler:
  MsgBox "ERROR"
  Exit Sub
End Sub

但仍然是同样的问题:errorHandler即使没有发生错误也会执行。

Answer 1

只需将 Exit sub 放入即可。

Sub mySub
 On Error GoTo myHandler:
    Workbooks.Open("myWorkbook")
'
' Some Code
'
Exit sub

myHandler:
MsgBox "EROOR !"

err.clear
End Sub