(1)在过程中可能导致错误的代码行的前面添加错误处理语句On Error Goto ErrHandler,其中的“ErrHandler”为自定义的错误标签名称。 (2)在有可能导致错误的代码行后面添加取消错误处理的语句On Error Goto 0,这样当遇到错误时,就不会跳转到指定的错误标签处,而是直接显示错误提示窗口,其中包括【调试】、【结束】等按钮。
VBA的异常处理机制通过On Error Goto语句实现。首先，当可能产生错误的代码行前添加On Error Goto ErrHandler，设置自定义错误标签。遇到错误时，如果没有On Error Goto 0，程序会直接跳转到错误标签，显示调试和结束选项。在宏或程序尾部， Exit Sub用于在无错误时终止错误处理，避免错误程序的执行。错误标...
在需要取消的地方，放下面这句就可以了：On Error GoTo 0 GoTo 0 就表示从这里开始取消错误捕捉，并不需要存在 0: 的标志。有疑问，请Hi我或给我发百度消息 GoodLuck!
在Error GoTo 0 上,停用目前程式中的錯誤處理。 即使程序中包含編號為 0 的行,它也不會將第 0 行指定為錯誤處理程式碼的開始。 如果沒有 On Error GoTo 0 語 句,當程序結束時,會自動停用錯誤處理程式。若要防止錯誤處理程式代碼在未發生錯誤時執行,請將 Exit Sub、 Exit 函式或Exit Property 語句放在錯誤...
1.On Error GoTo 0 代码停止运行在出现错误的行并显示错误消息。 2.On Error GoTo [标签] 当错误发生时,代码移至指定的行或标签处,不会显示错误消息。 3.On Error GoTo -1 清除当前错误。 4.On Error Resume Next 当错误发生时,代码移至下一行继续执行,不会显示错误消息。
On Error GoTo -1:清除当前错误 先来看第一种,这是使用最频繁的错误处理方式: On Error GoTo line_handle Sub errortest1() On Error GoTo error_handle Debug.Print 1 / 0 Debug.Print "no error happend" Exit Sub error_handle: Debug.Print "Err.Number:"; Err.Number ...
On Error Goto -1 清除当前错误设置并恢复为默认值。 On Error Resume Next 忽略错误,代码继续运行。 On Error Goto [标签] 当发生错误时,跳转到指定的标签处执行。 Err对象 当发生错误时,存储错误信息的对象。 Err.Number 错误编号。可以在需要检查发生指定...
VBA的 程序终止、退出语句块、分支及错误处理( End,exit,onerrorgotoinVBA 代码1: 程序终止及退出方法 1 Option Explicit 2 3 '一、END语句 4 5 '作用:强制退出所有正在运行的程序。 6 7 '二、Exit语句 8 9 '退出指定的语句 10 11 '1、Exit Sub 12 Sub e1() 13 Dim x As Integer 14 For x = ...
在不使用On Error GoTo 0语句的情况下，退出过程时将自动禁用错误处理程序。程序在运行过程中我们可以用On Error Resume Next语句屏蔽掉某段代码中可能出现的预知的不要处理的错误，如果接下来，一切是未知的，我们需要启动错误处理或者错误的捕获，就可以用On Error GoTo 0 来实现。2 On Error GoTo 0 语句的...
On Error GoTo Err_Handle MsgBox Cells.Find(12).Address Exit Sub '如果没有这个退出过程语句,会一直执行下去 Err_Handle: MsgBox ("不存在该数字") End Sub (1)、电子表中数据和代码 (2)、查找12的结果: (3)、查找13的结果: 第二种捕捉方法: ...