9

On Error GoTo 0エラー処理 をリセットするという印象を受けました。

では、なぜOn error resume next次のように登録されていないようですか?

Sub GetAction()
Dim WB As Workbook
Set WB = ThisWorkbook

On Error GoTo endbit:
'raise an error
Err.Raise 69
Exit Sub
endbit:
On Error GoTo 0 '<<<reset error handling?

On Error Resume Next
WB.Sheets("x").Columns("D:T").AutoFit
MsgBox "ignored error successfully and resumed next"    

End Sub
4

1 に答える 1

7

エラー トラップを使用するOn Error GoTo -1 、リセットする必要があります。Err.Clear

詳細な説明については、数か月前に投稿したこの回答を確認してください。

于 2013-03-21T10:24:55.713 に答える