CVErr (función)

Nota: Nos gustaría proporcionarle el contenido de ayuda actual lo más rápido posible en su idioma. Esta página se ha traducido mediante un sistema automático y es posible que contenga imprecisiones o errores gramaticales. Nuestro objetivo es que este contenido sea útil para usted. ¿Puede informarnos sobre si la información le ha sido útil al final de la página? Aquí tiene el artículo en inglés para que pueda consultarlo fácilmente.

Devuelve un valor de Variant de subtipo Error que contiene un número de error especificado por el usuario.

Sintaxis

CVErr ( errornumber )

El requiere errornumberargumento es un número de error válido.

Comentarios

Use la función CVErr para crear errores definidos por el usuario en procedimientos creados por el usuario. Por ejemplo, si crea una función que acepta varios argumentos y normalmente devuelve una cadena, puede hacer que la función evaluar los argumentos de entrada para asegurarse de que están dentro de un rango aceptable. Si no es así, es probable que la función no devolverá qué esperar. En este caso, CVErr le permite devolver un número de error que le indica qué acción debe realizar.

Tenga en cuenta que no se permite la conversión implícita de un Error . Por ejemplo, no puede asignar directamente el valor devuelto de CVErr a variable que no es un valor Variant. Sin embargo, puede realizar una conversión explícita (utilizando CInt, CDbletc.) del valor devuelto por CVErr y asignarlo a una variable de la adecuada tipo de datos.

Ejemplo

Nota: Los ejemplos siguientes muestran el uso de esta función en un Visual Basic para aplicaciones (VBA). Para obtener más información sobre cómo trabajar con VBA, seleccione la Referencia del programador en la lista desplegable situada junto a Buscar y escriba uno o varios términos en el cuadro de búsqueda.

Este ejemplo usa la función CVErr para devolver un valor Variant cuyo VarType es vbError (10). La función definida por el usuario CalculateDouble devuelve un error si el argumento pasado no es un número. Puede utilizar CVErr para devolver errores definidos por el usuario desde procedimientos definidos por el usuario o para aplazar el control de un error de tiempo de ejecución. Use la función ESERROR para comprobar si el valor representa un error.

' Call CalculateDouble with an error-producing argument.
Sub Test()
Debug.Print CalculateDouble("345.45robert")
End Sub
' Define CalculateDouble Function procedure.
Function CalculateDouble(Number)
If IsNumeric(Number) Then
CalculateDouble = Number * 2 ' Return result.
Else
CalculateDouble = CVErr(2001) ' Return a user-defined error
End If ' number.
End Function
Ampliar sus conocimientos de Office
Explorar los cursos
Obtener nuevas características primero
Únase a los participantes de Office Insider

¿Le ha sido útil esta información?

¡Gracias por sus comentarios!

Gracias por sus comentarios. Quizá le interese ponerse en contacto con uno de nuestros agentes de soporte de Office.

×