要清除已发生的错误,使用On Error GoTo -1。在下面的代码中,我们添加了该语句,这样第二个错误会导致代码跳至errH_Two标签处: Sub TwoErrors() On Error GoTo errH '产生"类型不匹配"错误 Error (13) Done: Exit Sub errH: '清除错误 On Error GoTo -1 On Error GoTo errH_Two '产生"应用程序定义"...
On Error GoTo labelname 其中,labelname 是一个在代码中定义的标签,用于标记错误处理代码的开始位置。该标签必须位于当前过程(Sub或Function)的范围内,并且必须是一个有效的行标签(即以冒号 : 结尾的行)。 给出使用On Error GoTo处理错误的一个简单示例: vba Sub ErrorHandlingExample() On Error GoTo Error...
(1)在过程中可能导致错误的代码行的前面添加错误处理语句On Error Goto ErrHandler,其中的“ErrHandler”为自定义的错误标签名称。 (2)在有可能导致错误的代码行后面添加取消错误处理的语句On Error Goto 0,这样当遇到错误时,就不会跳转到指定的错误标签处,而是直接显示错误提示窗口,其中包括【调试】、【结束】等按钮。
On Error GoTo 0 停止在当前过程中处理错误。即使过程中包含编号为 0 的行,它也不把行 0 指定为处理错误的代码的起点。如果没有 On Error GoTo 0 语句,在退出过程时,错误处理程序会自动关闭。 练习: Public Sub Test() On Error GoTo Label Dim x, y As Integer For x = 1 To 7 y = Cells(x, ...
Sub GotoLabel() Dim x As Long Dim y As Long On Error GoTo errH x = 6 y = 6 / 0 x = 7 Done: Exit Sub errH: MsgBox "发生了错误: "& Err.Description EndSub 运行代码的结果如下图5所示。 图5 运行上述VBA代码,代码执行到以...
一、On Error语句的基本格式和作用 在VBA中,On Error语句的基本格式如下: On Error {GoTo 0 | Resume Next | GoTo label} 其中,On Error GoTo 0表示取消错误处理,程序将继续按照正常的流程执行。On Error Resume Next表示忽略错误,程序将继续执行下一条语句。On Error GoTo label表示在发生错误时跳转到指定的...
1、On Error GoTo Label:当代码遇到错误时,执行流程将跳转到指定的标签(Label),在那里你可以编写错误处理代码。 2、On Error Resume Next:忽略错误,继续执行下一条语句。 3、On Error GoTo 0:关闭错误处理,当错误发生时,VBA将显示标准的错误消息框。
1. On Error Resume Next:此语句使代码在发生错误时继续执行,而不会中断。相当于忽略错误并继续执行下一行代码。 2. On Error GoTo 0:此语句将错误处理重置为默认状态,并且任何错误都会导致代码中断并显示错误消息。这是默认的错误处理方式。 3. On Error GoTo [label]:此语句将错误处理重定向到指定的标签位置...
VBA默认错误处理是On Error GoTo0, 就是当出现问题时候, 显示错误. 按OK可直接退出 或者按debug进入VBE debug. 这样对用户当然是不大友好, 对码code的人又有点信息不足. 写自定义错误处理, 我们有两个常用选择: On ErrorGoTolabel/Line :有错误的时候跳到标签或者行 ...
VBA的异常处理机制通过On Error Goto语句实现。首先，当可能产生错误的代码行前添加On Error Goto ErrHandler，设置自定义错误标签。遇到错误时，如果没有On Error Goto 0，程序会直接跳转到错误标签，显示调试和结束选项。在宏或程序尾部， Exit Sub用于在无错误时终止错误处理，避免错误程序的执行。错误...