前言
在运行VBA的过程中会有一些报错,例如类型不匹配等运行错误。On Error错误处理程序能直接有效的解决报错。但是当程序逻辑复杂时, 使用On Error会掩盖其他的未知错误,所以应尽可能想办法排除错误,或在已知功能范围内使用。
1.On Error Resume Next
忽略错误并继续运行,最常用的语句
On Error Resume Next
'你的程序
If Err.Number > 0 ThenDebug.Print "报错"
Else
Err.Number时产生错误时返回的参数,此示例中Err.Number=52,如果没有错误,Err.Number=0
2.On Error GoTo here
发生错误跳至标签指定行,不执行某一段程序,跳到下一段程序。
On Error GoTo errH'忽略接下来语句行发生的错误
'你的程序
Exit Sub
here:
Debug.Print Err.Description
3.On Error GoTo 0
发生错误时停止运行并报错。与不加此语句的区别是及时停止程序,避免程序程序崩溃。