Introducción al uso de la instrución condicional If en VBA

Con la instrucción If then en VBA podremos decidir si ejecutar o no una instrucción.

Esto nos permite pasar de ejecutar linealmente cada línea de código a poder saltarnos algunas dependiendo de si se cumple la condición evaluada o no.

Este es el código del ejemplo de hoy.

a

a

Option Explicit

Sub condicional()

    

    'Declaramos una variable numerica

    Dim numeroSecreto As Integer

    Dim respuesta As Integer

        

    'asignamos un valor por error a una variable con otro nombre

    numeroSecreto = 4

    

    respuesta = InputBox("dime un numero")

    

    If numeroSecreto = respuesta Then

        'mostramos mensaje

        MsgBox ("Has acertado")

    End If

    

    If numeroSecreto <> respuesta Then

        'mostramos mensaje

        MsgBox ("No has acertado")

    End If

End Sub

Solicitamos un número al usuario e introduce un número incorrecto.

Tras la primera comparación, saltamos el primer mensaje.

Y procedemos a comprobar si el mensaje es distinto del valor de la variable.

 If numeroSecreto <> respuesta Then

Como se cumple la condición mostramos el mensaje.

Repetimos la ejecución, pero en este caso el valor es igual al de la variable.

La primera comprobación es correcta.

    If numeroSecreto = respuesta Then

Se muestra el primer mensaje.

Usando condicionales y bucles conseguiremos que nuestras macros puedan parecer tener algo de inteligencia, y podremos automatizar gran cantidad de tareas.