「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