错误处理的目的

1 容错;

2 给出友好的错误提示并适时地退出程序;

 

捕捉错误

On Error Goto Line

……

Line:

...

 

on Error Resume next

 

on error GoTo 0

 

功能

1 可以在发生错误时让VBA程序来处理而不是显示错误提示窗口;

2 可以设置一个错误陷阱,在发生错误时跳转到程序过程中指定的代码来进行相应的处理;在On Error Resume Next语句的过程中,在预计可能发生错误之后,可以使用Err对象来监测是否有运行时错误发生;Err对象有一个Number属性,不同的错误该属性有不同的返回值;一般该值为0时,表示没有错误发生;

3 在发生的错误对后面的程序没有重大影响的情况下,也可以直接忽略错误,而不致中断程序;