「VBA」Resume Nextで例外を無視するサンプル
書式
On Error Resume Nex
使用例
Sub testFunc()
On Error Resume Next
Workbooks.Open ("C:\testinfo.xlsx")
Exit Sub
Exception:
MsgBox Err.Number & vbCrLf & Err.Description
End Sub
Coding Changes the World
書式
On Error Resume Nex
使用例
Sub testFunc()
On Error Resume Next
Workbooks.Open ("C:\testinfo.xlsx")
Exit Sub
Exception:
MsgBox Err.Number & vbCrLf & Err.Description
End Sub