错误处理部分代码在VBA中执行

Question

我正在编写一个宏程序，因为如果发生错误我需要显示自定义错误消息，我在这里遇到问题。错误处理工作正常。但即使没有发生错误，错误处理部分中的代码仍在执行

On Error GoTo ErrorHandling
Source_File_Path = "G:\" & Source_File_name & ".csv"
Open Source_File_Path For Input As #1
On Error GoTo 0
.
.
.
ErrorHandling:
Worksheets("REPORT_VIEW").Activate
MsgBox "FILE NOT FOUND"

我每次都看到“FILE NOT FOUND”错误。 帮帮我，干杯......

Answer 1

如果代码来自函数，则需要添加一个Exit子语句（或Exit函数）。例如：

NRf2