Excel-VBA（14）：VBA中控制结构介绍（On error错误控制及其他）

On Error错误控制语句

如果不使用On Error语句，则任何运行时错误都是致命的。也就是说，结果会导致显示错误信息并中止运行。

程序中设置了On Error语句后，运行环境中的错误捕获也需要设置。在VBE中，选择菜单栏中的【工具】【选项】命令，选择【通用】选项卡，在【错误捕获】选项区域中选中【遇到未处理的错误时中断】单选按钮，如图2-14所示。设置后，在程序运行中，只有遇到没有设置On Error语句的错误，程序才会提示并中断。

1．On Error GoToline

如果发生一个运行时错误，则控件会跳到line标记行，激活错误处理程序。指定的line 必须在一个过程中，否则会发生编译时间错误。

错误处理程序不是Sub过程或Function过程，它是一段用行标记的代码。

2．On Error Resume Next

程序从紧随产生错误语句之后的语句继续执行，或是从紧随最近一次调用含有On Error Resume Next语句的过程中的语句继续运行。这个语句可以忽略运行时产生的错误，使程序得以继续执行。

3．On Error GoTo 0

On Error GoTo 0停止在当前过程中处理错误。即使过程中包含编号为0的行，它也不把行0指定为处理错误的代码的起点。

其他常用语句

1．With语句

With语句的作用是在用户自定义类型或对象内执行一系列语句。例如，设置某个对象的格式属性，具体示例如下：

程序中经常使用With语句，增加程序的可读性和运行效率。

2．While…Wend语句

与Do…Loop语句相同，满足一定条件后，进入循环体。