Excel VBA tiene la construcción IF Then Else que puede usar para analizar múltiples condiciones y ejecutar códigos basado en estas condiciones.
Otra construcción similar que le permite verificar múltiples condiciones es la declaración SELECT CASE.
Seleccionar caso es útil cuando tiene tres o más condiciones que desea verificar. También puede usar esto con dos condiciones (pero creo que If Then Else es más fácil de usar en esos casos).
Un ejemplo simple donde la instrucción Select Case es útil cuando desea obtener la calificación de un estudiante en función de las calificaciones que ha obtenido (se tratan como ejemplo más adelante en este tutorial).
Nota: Todos los códigos de ejemplo cubiertos en este tutorial están destinados a colocarse en un módulo en VBA.
Este tutorial cubre:
Sintaxis de caso de selección
A continuación se muestra la sintaxis de caso de selección en Excel VBA:
Select Case Test_ExpressionCase Value_1Code Block when Test_Expression = Value_1Case Value_2Code Block when Test_Expression = Value_2Case Value_3Code Block when Test_Expression = Value_3Case ElseCode Block when none of the case conditions are metEnd Select
- Test_Expression: esta es la expresión cuyo valor analizamos usando diferentes casos (explicado mejor con los ejemplos a continuación).
- Condición_1, Condición_2,…: estas son las condiciones en las que se prueba la expresión de texto. Si cumple con la condición, entonces se ejecuta el bloque de código para la condición dada.
Para cada instrucción Select Case que use, debe usar la instrucción End Select.
Nota: Tan pronto como se cumple una condición, VBA sale de la construcción de casos seleccionados. Entonces, si tiene cinco condiciones y se cumple la segunda condición, VBA saldrá de Seleccionar caso, y el resto de las condiciones no se probarán.
Seleccionar ejemplos de casos
Ahora para Para entender mejor cómo usar la instrucción Select Case en VBA, veamos algunos ejemplos.
Tenga en cuenta que la mayoría de los ejemplos en este tutorial están destinados a explicar el concepto. Éstos pueden ser o no la mejor manera de hacer el trabajo.
Comencemos con un ejemplo simple de ver cómo Select Case nos permite verificar las condiciones.
Ejemplo 1 – Verifique los números
En el siguiente ejemplo, el código le pide al usuario que ingrese cualquier número entre 1 y 5, y luego muestra un cuadro de mensaje con el número que ingresó el usuario.
Sub CheckNumber()Dim UserInput As IntegerUserInput = InputBox("Please enter a number between 1 and 5")Select Case UserInputCase 1MsgBox "You entered 1"Case 2MsgBox "You entered 2"Case 3MsgBox "You entered 3"Case 4MsgBox "You entered 4"Case
read more