¿Cómo usar la función IsError en VBA?

La función `IsError` en VBA se utiliza para determinar si una expresión o un valor genera un error. Es muy útil cuando deseas identificar si una variable contiene un error antes de tomar decisiones en tu código. La función devuelve `True` si el valor es un error y `False` en caso contrario.

Aquí tienes un ejemplo básico de cómo usar la función `IsError` en VBA:

Sub UsoDeIsError()
    Dim resultado As Variant
    Dim valor As Variant

    ' Intentamos una operación que podría causar un error
    On Error Resume Next
    resultado = 1 / 0    ' División por cero, generará un error
    On Error GoTo 0

    ' Comprobamos si resultado contiene un error
    If IsError(resultado) Then
        MsgBox "Resultado contiene un error."
    Else
        MsgBox "Resultado es: " & resultado
    End If

    ' Otro ejemplo con una función que podría devolver un error
    valor = CVErr(xlErrNA) ' Simula un error #N/A
    
    If IsError(valor) Then
        MsgBox "Valor contiene un error."
    Else
        MsgBox "Valor es: " & valor
    End If
End Sub

En este ejemplo:

Hemos creado una subrutina llamada `UsoDeIsError`.
Intentamos realizar una división por cero, lo cual generará un error. Usamos `On Error Resume Next` para manejar el error sin detener la ejecución del programa.
Luego, usamos `IsError` para verificar si la variable `resultado` contiene un error, y mostramos un mensaje apropiado en función del resultado de esa verificación.
También demostramos cómo usar `IsError` con un valor que simula un error directamente utilizando `CVErr(xlErrNA)`.

Recuerda siempre manejar adecuadamente los errores en tus aplicaciones para evitar comportamientos inesperados y mejorar la robustez del código.

facebooklinkedin