Sentencia If Then else en VBA
La instrucción If Then else en VBA es necesaria para tomar decisiones dentro del código en VBA
La sintaxis es como sigue:
If condición Then
[Instrucciones a ejecutar]
[ ElseIf condición2 Then ]
[Instrucciones a ejecutar]]
[ Else
[Instrucciones a ejecutar]]
End If
[Instrucciones a ejecutar]
[ ElseIf condición2 Then ]
[Instrucciones a ejecutar]]
[ Else
[Instrucciones a ejecutar]]
End If
O también
If condition Then [Instrucciones a ejecutar] [ Else [ Instrucciones a ejecutar] ]
En esta estructura "condición" representa el caso que debe cumplirse para que se ejecute la primera parte de la condición, elseif es una parte opcional que se ejecutaría solo si la parte anterior no se cumple y se requiere añadir alguna otra condición, mientras que "else" hace que todos los casos en los que no se haya cumplido ninguno de los casos previos se pueda ejecutar las instrucciones siguientes, así tendríamos por ejemplo:
Sub EjemploIfThenElse()
a = 12
If a = 8 Then
MsgBox "1"
ElseIf a = 12 Then
MsgBox "2"
Else
MsgBox "3"
End If
End Sub
a = 12
If a = 8 Then
MsgBox "1"
ElseIf a = 12 Then
MsgBox "2"
Else
MsgBox "3"
End If
End Sub
Si "a" vale 8 entonces se ejecutaría el primer mensaje, si "a" en cambio valiese 12 se ejecutaría el segundo mensaje, en todos los demás valores posibles de "a" se ejecutaría el tercer mensaje.
En los siguientes ejemplos se puede encontrar una gran variedad de usos de if en vba.
Ingresamos una nota y mostramos si en base a esa nota el alumno esta aprobado o desaprobado :
MacroAprobadoDesaprobado
MacroAprobadoDesaprobado
Ingresamos una nota y mostramos si en base a esa nota el alumno tiene la denominación A, B, C.
jaaaaaaaaaaaaaaaaaaaaaaaaaajaaaaaaajajajajajajajajaja
ResponderBorrar