On Error Resume Next'如果遇到毛病,不管毛病,继续往下履行,但如果嵌套了其他毛病处理语句,这些毛病处理语句还是会依照自己规则运行 语句xxxx On Error GoTo 0 ’结束毛病捕捉 2、举例代码: Sub 查找数字() Dim i As Integer On Error Resume Next '遇到毛病向下履行 MsgBox Cells.Find(13).Address On Error GoT...
(1)在过程中可能导致错误的代码行的前面添加错误处理语句On Error Goto ErrHandler,其中的“ErrHandler”为自定义的错误标签名称。 (2)在有可能导致错误的代码行后面添加取消错误处理的语句On Error Goto 0,这样当遇到错误时,就不会跳转到指定的错误标签处,而是直接显示错误提示窗口,其中包括【调试】、【结束】等按钮。
(1)在过程中可能导致错误的代码行的前面添加错误处理语句On Error Goto ErrHandler,其中的“ErrHandler”为自定义的错误标签名称。 (2)在有可能导致错误的代码行后面添加取消错误处理的语句On Error Goto 0,这样当遇到错误时,就不会跳转到指定的错误标签处,而是直接显示错误提示窗口,其中包括【调试】、【结束】等按钮。
On Error GoTo 0 On Error语句语法可具有以下任意形式: 语句说明 在错误 GoTo行上启用错误处理例程,该例程从所需行参数中指定的行开始。 line参数是任何行标签或行号。 如果发生运行时错误,控制分支到行,使错误处理程序处于活动状态。 指定的line必须与On Error语句在同一个过程中;否则将出现编译时错误。
1.On Error GoTo 0 代码停止运行在出现错误的行并显示错误消息。 2.On Error GoTo [标签] 当错误发生时,代码移至指定的行或标签处,不会显示错误消息。 3.On Error GoTo -1 清除当前错误。 4.On Error Resume Next 当错误发生时,代码移至下一行继续执行,不会显示错误消息。
On Error GoTo Err_Handle MsgBox Cells.Find(12).Address Exit Sub '如果没有这个退出过程语句,会一直执行下去 Err_Handle: MsgBox ("不存在该数字") End Sub (1)、电子表中数据和代码 (2)、查找12的结果: (3)、查找13的结果: 第二种捕捉方法: ...
这个机制导致了suberrortest8中的onerrorgotoerrorhandle2onerrorgotoerrorhandle3这两语句无效无效的情况下发生错误执行的是vba的默认错误处理方法即第三种终止代码弹出错误信息 【VBA】onerror VBA的错误监听和处理语句有四种 On Error GoTo line_handle :当错误发生时,会立刻跳转到line行去 On Error Resume Next:...
1.On Error GoTo 0 代码停止运行在出现错误的行并显示错误消息。 2.On Error GoTo [标签] 当错误发生时,代码移至指定的行或标签处,不会显示错误消息。 3.On Error GoTo -1 清除当前错误。 4.On Error Resume Next 当错误发生时,代码移至下一...
VBA默认错误处理是On Error GoTo 0, 就是当出现问题时候, 显示错误. 按OK可直接退出 或者按debug进入VBE debug. 这样对用户当然是不大友好, 对码code的人又有点信息不足. 写自定义错误处理, 我们有两个常用选择: On ErrorGoTolabel/Line :有错误的时候跳到标签或者行 ...