On Error GoTo skip Sheets('销售').Delete Exit Sub skip: MsgBox '工作簿中无此工作表' End Sub 当出现错误时转到skip语句去运行。 二、On Error Resume Next 语法: On Error Resume Next 如果出现错误的结果则跳过该句,直接执行下一句。 举例: 新建一个工作簿,其中一个工作表名称改为销售,打开VBE,插入...
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 一、实现功能要求:求总分。1、在Excel界面中,初始数据如下:2 2、进入VBE界面中,编写如下代码:Sub OnErrorResume()Dim i%For i = 2 To 6:Sheet4.Range("d" & i) = Sheet4.Range("b" & i) + Sheet4.Range("c" & i)NextEnd Sub3、运行代码,则报一下错误;错误原因为:包含字符串类型;...
在Kill语句之前,使用了On Error Resume Next语句,如果要删除的文件不存在,则会忽略由此而导致的错误,继续执行下一行代码On Error GoTo 0,恢复VBA默认的错误处理。这样,就不用考虑要删除的文件是否存在了。
1.On Error GoTo line 如果发生一个运行时错误,则控件会跳到line标记行,激活错误处理程序。指定的line 必须在一个过程中,否则会发生编译时间错误。错误处理程序不是Sub过程或Function过程,它是一段用行标记的代码。2.On Error Resume Next 程序从紧随产生错误语句之后的语句继续执行,或是从紧随最近一次调用...
1.On Error GoToline 如果发生一个运行时错误,则控件会跳到line标记行,激活错误处理程序。指定的line 必须在一个过程中,否则会发生编译时间错误。 错误处理程序不是Sub过程或Function过程,它是一段用行标记的代码。 2.On Error Resume Next 程序从紧随产生错误语句之后的语句继续执行,或是从紧随最近一次调用含有On...
VBA默认的错误处理是On Error GoTo 0,即在出现问题时显示错误,用户可以通过点击OK退出或进入VBE调试。这种方式对用户不友好,对编码者信息不足。因此,我们需要自定义错误处理,常用的方法有两种:On Error GoTo label/Line和On Error Resume Next。通常的做法是在代码前设置On Error GoTo 标签,然后在...
可以的 sub()on error goto ERR 有可能出现异常的代码 ERR:异常处理 end sub
3.On Error GoTo -1 清除当前错误。 4.On Error Resume Next 当错误发生时,代码移至下一行继续执行,不会显示错误消息。 On Error GoTo 0 这是VBA默认的处理错误的操作。 发生错误时,VBA将在出现错误的行上停止运行并显示错误消息。此时,需要用户干预代码才能继续。在这种情况下不会发生错误处理。