我正在迭代excel文件的大目录（xls，xlsx，xlsm），并且正在运行其中一个文件的问题。我想跳过这个文件以及显示同样问题的任何其他文件。
当程序试图打开文件时，我会弹出上面的错误消息。下面是代码，它应该跳过错误，但它没有帮助，代码停止执行。
On Error Resume Next
Application.DisplayAlerts = False
Set sourceWB = Workbooks.Open(fileName:=filePath, UpdateLinks:=False, ReadOnly:=True, IgnoreReadOnlyRecommended:=True, Password:="", Editable:=False)
弹出窗口显示后，我将鼠标悬停在第2行，当它不应该显示时显示“True”。没有其他代码可以触发事件，也可以在关闭警报和打开工作簿之间运行。
手动打开工作簿，我发现服务器拒绝访问。
非常感谢任何帮助。 谢谢， 詹姆斯