При ошибке Goto 0 не сбрасывается ошибка захвата


У меня сложилось впечатление, что 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
1 8

1 ответ:

Вам нужно использовать On Error GoTo -1 или Err.Clear чтобы сбросить блокировку ошибок.

Проверьтеэтот ответ я опубликовал несколько месяцев назад для более подробного объяснения.