在上面的示例中,如果x = 1 / 0触发错误,程序会跳转到ErrorHandler标签处执行。在错误处理例程中,我们显示了一个错误消息框,并使用On Error GoTo 0重置了错误处理器。这样,如果在ErrorHandler之后的代码中再次发生错误,程序不会捕获到这个错误,而是直接停止执行。 总结: 合理处理VBA中的错误非常重要,可以避免程序...
而下面的代码由于及时使用了On Error Goto 0语句,因此,在第2次错误发生时(即第2个x/y),系统将显示内置错误消息,而不是运行MyErr标签处的代码。 1SubErrTest1()23DimxAsInteger, yAsInteger, zAsSingle45x =167y =089OnErrorGoToMyErr1011MsgBoxx /y1213OnErrorGoTo01415MsgBoxx /y1617MsgBox"继续执行错误代码...
( 2 )在有可能导致错误的代码行后面添加取消错误处理的语句 On Error Goto 0 ,这样当遇到错误时,就不会跳转到指定的错误标签处,而是直接显示错误提示窗口,其中包括【调试】、【结束】等按钮。 ( 3 )在宏的末尾(正常程序的末尾)添加代码行 Exit Sub ,这样可以避免程序未发生错误时执行错误处理程序。 ( 4 )在...
1.On Error GoTo 0 代码停止运行在出现错误的行并显示错误消息。 2.On Error GoTo [标签] 当错误发生时,代码移至指定的行或标签处,不会显示错误消息。 3.On Error GoTo -1 清除当前错误。 4.On Error Resume Next 当错误发生时,代码移至下一行继续执行,不会显示错误消息。 On Error GoTo 0 这是VBA默认...
VBA的异常处理机制通过On Error Goto语句实现。首先，当可能产生错误的代码行前添加On Error Goto ErrHandler，设置自定义错误标签。遇到错误时，如果没有On Error Goto 0，程序会直接跳转到错误标签，显示调试和结束选项。在宏或程序尾部， Exit Sub用于在无错误时终止错误处理，避免错误程序的执行。错误...
On Error 語句語法可以有下列任何形式: 展開表格 陳述式描述 On Error GoToline 啟用從必要行自變數中指定行開始的錯誤處理例程。 行自變數是任何行標籤或行號。如果發生 運行時錯誤 ,請將分支控制到 一行,讓錯誤處理程式變成作用中。指定的行 必須與 On Error 語句在相同的程式中;否則會發生 編譯時期 錯誤。
在这个例子中,1 / 0会触发除零错误,但On Error Resume Next让程序跳过错误,并继续执行Debug.Print语句。 (2)On Error Goto ErrorHandler 这是VBA 处理错误的标准方式,意味着当代码遇到错误时,会跳转到指定的错误处理代码段。 Sub Example2() On Error Goto ErrorHandler ' 遇到错误时跳转到 ErrorHandler ...
iinputbox输入的是文本字符串，要用函数val()转换成aa的类型integer 。至于提示，ON ERROR语句要放在可能出现错误的前面而不是后面。系统执行到INPUTBOX这一行时，即已产生错误，因而后面的ON ERROR语句是不会执行的。on
可以运行多次 vba中提供了3个声明来设置错误陷阱.On Error GoTo line '如果错误产生, 则跳转到某行,或者标号执行 On Error Resume Next '如果错误产生, 则继续下一条语句 On Error GoTo 0 '清除当前设置的错误陷阱 一个声明来处理陷阱.Resume '执行完错误例程, 跳转到字程序.on error...
On Error Resume Next 忽略错误,代码继续运行。 On Error Goto [标签] 当发生错误时,跳转到指定的标签处执行。 Err对象 当发生错误时,存储错误信息的对象。 Err.Number 错误编号。可以在需要检查发生指定错误时使用。 Err.Description 描述错误的文本。