This example was updated with Excel version 2004 (build 12730.20270) and VBA 7.Enables the error-handling routine that starts at specified line
Returns a Variant of subtype Error (Locals Window > Type: Variant/Error) containing an error number specified by the userīranches to a specified line within a procedureĮnables an error-handling routine and specifies the location of the routine within the procedure. If the Analyst clicks the Debug button, the code window displays the Yellow step line at the place where the error was raised (figure 2 - lower panel).įig 2: Visual Basic Run-time error - Division by zero - Debug window and associated error line In cases where an error is not raised, the Exit Function statement in line 6 suppresses execution of the error handler statement otherwise execution will always continue to the End Function statementĬode 4: Sub TestxlfReciprocal the reciprocal of Number: 1 / Number This occurs in the case of a worksheet #VALUE! error, or a VBA Run-time error (shown in figure 1). In code 2 line 3, the VBA On Error Goto statement transfers program control to the line with the label name - ErrHandler line 7. CVErr returns a Variant with subtype Error, thus the function name is set to type Variant to allow this return type. This value is converted to an error with the VBA CVErr function. The #DIV/0! error is code value 2007 (see the Cell Error Values table below) with an enumeration of xlErrDiv0. '' Return the reciprocal of Number: 1 / Number Dear all, I saw so programs use the code 'On error goto 0'. Code 1: Function xlfReciprocal_1 the reciprocal of Number: 1 / Numberįunction xlfReciprocal_1(Number As Double) As Variant
0 kommentar(er)
