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: Nivel de Experiencia (Filas 1-3)

Usa If...ElseIf. Lee A2: <2 = "Principiante", <5 = "Intermedio", >=5 = "Avanzado". Escribe en B2.

AB
1Años Exp.Nivel
21[ B2 ]
36[ B3 ]
If - ElseIfEjercicio 2: Consumo de Agua (Filas 5-7 | Fila 4 libre)

Usa If...ElseIf. Lee A6: <15 = "Bajo", <30 = "Normal", >=30 = "Alto". Escribe el resultado en B6.

AB
5Metros Cúbicos (m³)Rango
622[ B6 ]
735[ B7 ]
If - ElseIfEjercicio 3: Comisión de Ventas (Filas 9-11 | Fila 8 libre)

Usa If...ElseIf. Lee A10: >20000 = "8%", >10000 = "5%", <=10000 = "2%". Escribe en B10.

AB
9Venta Total ($)Comisión
1015000[ B10 ]
118000[ B11 ]
If - ElseIfEjercicio 4: Años para Jubilación (Filas 13-15 | Fila 12 libre)

Usa If...ElseIf. Lee A14: >=65 = "Elegible", >=60 = "Próximo", <60 = "No Elegible". Escribe en B14.

AB
13EdadEstatus Jubilación
1461[ B14 ]
1566[ B15 ]
If - ElseIfEjercicio 5: Capacidad de Almacenamiento (Filas 17-19 | Fila 16 libre)

Usa If...ElseIf. Lee A18: >90 = "Lleno", >70 = "Casi Lleno", <=70 = "Espacio Disponible". Escribe en B18.

AB
17Uso Disco (%)Estado
1882[ B18 ]
1945[ B19 ]
Select CaseEjercicio 6: Tipo de Documento (Filas 21-23 | Fila 20 libre)

Usa Select Case. Lee A22: "DNI"="Nacional", "PAS"="Pasaporte", "CE"="Extranjería". Escribe en B22.

AB
21Doc CódigoTipo Identificación
22DNI[ B22 ]
23PAS[ B23 ]
Select CaseEjercicio 7: Clasificación de Frutas (Filas 25-27 | Fila 24 libre)

Usa Select Case agrupando. Lee A26: "Limón","Naranja"="Cítrico"; "Manzana","Pera"="Dulce". Escribe en B26.

AB
25FrutaCategoría
26Limón[ B26 ]
27Manzana[ B27 ]
Select CaseEjercicio 8: Frecuencia de Asistencia (Filas 29-31 | Fila 28 libre)

Usa Select Case con To. Lee A30: 1 To 3="Baja", 4 To 7="Media", 8 To 10="Alta". Escribe en B30.

AB
29Días AsistidosNivel Asistencia
305[ B30 ]
319[ B31 ]
Select CaseEjercicio 9: Evaluación de Velocidad de Internet (Filas 33-35 | Fila 32 libre)

Usa Select Case con Is. Lee A34: Is < 20="Lenta", Is <= 100="Media", Is > 100="Rápida". Escribe en B34.

AB
33Velocidad (Mbps)Calificación
3450[ B34 ]
35300[ B35 ]
Select CaseEjercicio 10: Estado de Pedido (Filas 37-39 | Fila 36 libre)

Usa Select Case. Lee A38: "P"="Pendiente", "E"="Enviado", "D"="Entregado". Escribe en B38.

AB
37Código EstadoDescripción
38E[ B38 ]
39D[ B39 ]