Evaluación de VBA: Estructuras de Selección Múltiple

Resuelve los siguientes 10 ejercicios programando las macros requeridas en una sola hoja de Excel.

If - ElseIfEjercicio 1: Clasificación de Edad (Filas 1-3)

Usa If...ElseIf. Lee A2: <13 = "Niño", <18 = "Joven", >=18 = "Adulto". Escribe el resultado en B2.

AB
1EdadResultado
215[ B2 ]
322[ B3 ]
If - ElseIfEjercicio 2: Calificación Escolar (Filas 5-7 | Fila 4 libre)

Usa If...ElseIf. Lee A6: >=90 = "A", >=80 = "B", >=70 = "C", <70 = "F". Escribe el resultado en B6.

AB
5NotaLetra
684[ B6 ]
762[ B7 ]
If - ElseIfEjercicio 3: Descuento por Compra (Filas 9-11 | Fila 8 libre)

Usa If...ElseIf. Lee A10: >500 = "20%", >200 = "10%", de lo contrario = "Sin Descuento". Escribe el resultado en B10.

AB
9Monto ($)Descuento
10350[ B10 ]
11150[ B11 ]
If - ElseIfEjercicio 4: Control de Velocidad (Filas 13-15 | Fila 12 libre)

Usa If...ElseIf. Lee A14: >120 = "Multa Alta", >90 = "Multa Bajar", <=90 = "Normal". Escribe el resultado en B14.

AB
13Velocidad (km/h)Sanción
14105[ B14 ]
1580[ B15 ]
If - ElseIfEjercicio 5: Nivel de Batería (Filas 17-19 | Fila 16 libre)

Usa If...ElseIf. Lee A18: <15 = "Crítico", <50 = "Medio", >=50 = "Optimo". Escribe el resultado en B18.

AB
17Batería (%)Estado
1812[ B18 ]
1975[ B19 ]
Select CaseEjercicio 6: Día de la Semana (Filas 21-23 | Fila 20 libre)

Usa Select Case. Lee A22 (1 a 7): 1="Lunes", 2="Martes", ..., 7="Domingo". Escribe el resultado en B22.

AB
21Número DíaNombre Día
223[ B22 ]
236[ B23 ]
Select CaseEjercicio 7: Tipo de Vehículo (Filas 25-27 | Fila 24 libre)

Usa Select Case. Lee A26: "A"="Moto", "B"="Auto", "C"="Camión", otro="Desconocido". Escribe el resultado en B26.

AB
25Código VehículoCategoría
26B[ B26 ]
27Z[ B27 ]
Select CaseEjercicio 8: Trimestre del Año (Filas 29-31 | Fila 28 libre)

Usa Select Case con rangos To. Lee A30: 1 To 3="T1", 4 To 6="T2", 7 To 9="T3", 10 To 12="T4". Escribe en B30.

AB
29Mes (1-12)Trimestre
305[ B30 ]
3111[ B31 ]
Select CaseEjercicio 9: Estado del Clima (Filas 33-35 | Fila 32 libre)

Usa Select Case con Is. Lee A34: Is < 10="Frío", Is <= 25="Templado", Is > 25="Caluroso". Escribe en B34.

AB
33Temperatura (°C)Estado
3418[ B34 ]
3530[ B35 ]
Select CaseEjercicio 10: Menú de Bebidas (Filas 37-39 | Fila 36 libre)

Usa Select Case listando opciones por coma. Lee A38: "Agua", "Jugo"="Fría"; "Café", "Té"="Caliente". Escribe en B38.

AB
37BebidaTipo
38Café[ B38 ]
39Jugo[ B39 ]