Taller Práctico: Condicionales en VBA

10 ejercicios de toma de decisiones utilizando las estructuras If...Then e If...Then...Else.

📌 Indicaciones del Taller:

Escribe una macro en VBA para cada uno de los siguientes problemas. Lee los datos de las celdas indicadas, aplica la estructura condicional adecuada según la sección e imprime el resultado final en la celda resaltada en amarillo.

Parte 1: Condicional Simple (If...Then)

1. Bono de Ventas Destacadas Sub EjercicioIf1()

Enunciado: Si las ventas registradas en B1 superan los $1,000, la macro debe asignar un bono fijo de $100 en la celda B2. Si no supera dicha cifra, no se realiza ninguna acción.

AB
1Monto de Ventas ($)1250
2Monto de Bono ($)?
2. Alerta de Stock Crítico Sub EjercicioIf2()

Enunciado: Revisa el inventario actual de productos en B4. Si la cantidad es menor a 5 unidades, escribe el mensaje "REABASTECER" en la celda B5.

AB
4Stock de Productos3
5Estado Inventario?
3. Recargo por Pago Tardío Sub EjercicioIf3()

Enunciado: Toma el monto original de una factura en B7. Si los días de mora en B8 son mayores a 0, suma un recargo de $15 al monto inicial y muestra el nuevo total en la celda B9.

AB
7Monto Factura ($)200
8Días de Mora5
9Total a Pagar ($)?
4. Premio por Asistencia Perfecta Sub EjercicioIf4()

Enunciado: Verifica la cantidad de inasistencias en B11. Si las inasistencias son iguales a 0, escribe el mensaje "EXENTO DE EXAMEN" en la celda B12.

AB
11Faltas Registradas0
12Beneficio?
5. Control de Temperatura Ambiental Sub EjercicioIf5()

Enunciado: Lee la temperatura del sensor en B14. Si la temperatura es mayor o igual a 30 °C, muestra en la celda B15 la instrucción "ENCENDER VENTILACIÓN".

AB
14Temperatura (°C)32
15Acción Sistema?

Parte 2: Condicional Doble (If...Then...Else)

6. Evaluación Final de Curso Sub EjercicioIfElse1()

Enunciado: Evalúa la nota final en B17. Si es mayor o igual a 11, escribe "APROBADO" en B18. De lo contrario (Else), escribe "REPROBADO".

AB
17Nota Final10.5
18Estado del Alumno?
7. Verificación de Voto Ciudadano Sub EjercicioIfElse2()

Enunciado: Toma la edad del usuario en B20. Si es mayor o igual a 18, muestra "HABILITADO PARA VOTAR" en B21. Si es menor, muestra "NO HABILITADO".

AB
20Edad del Ciudadano17
21Condición Electoral?
8. Descuento según Tipo de Cliente Sub EjercicioIfElse3()

Enunciado: Evalúa la categoría en B23. Si es igual a "VIP", calcula en B25 un 20% de descuento sobre la compra en B24. De lo contrario, aplica solo un 5% de descuento.

AB
23Tipo de ClienteGENERAL
24Monto Compra ($)100
25Descuento Aplicado ($)?
9. Clasificación Par o Impar Sub EjercicioIfElse4()

Enunciado: Lee el número entero en B27. Utiliza la operación Mod 2 para evaluar si el residuo es 0. Si se cumple, escribe "NÚMERO PAR" en B28. De lo contrario, escribe "NÚMERO IMPAR".

AB
27Número a Evaluar15
28Tipo de Número?
10. Control de Aforo de Evento Sub EjercicioIfElse5()

Enunciado: Compara los asistentes en B30 con el límite máximo en B31. Si los asistentes son menores o iguales al límite, escribe "EVENTO AUTORIZADO" en B32. Si supera el límite, escribe "AFORO EXCEDIDO".

AB
30Asistentes Confirmados120
31Aforo Máximo Permitido100
32Dictamen del Evento?