Taller Práctico 2: Bucles For...Next y Do While...Loop

Control Académico y Facturación de Clientes (10 Ejercicios)

1. Tablas de Datos para la Práctica

TABLA 1: Calificaciones de Exámenes (Rango A1:D21) — Para Ejercicios 11 a 15 (For Next)
Fila A (Estudiante) B (Examen 1) C (Examen 2) D (Promedio / Estado)
1EstudianteExamen 1Examen 2Resultado
2Mateo Alonso7580
3Camila Barrientos4055
4Lucas Benítez9095
5Valentina Cano6062
6Sebastián Cordero3045
7Mariana Delgado8588
8Javier Espinosa5058
9Gabriela Franco98100
10Alejandro Gil6570
11Daniela Herrera4238
12Nicolás Ibáñez7882
13Victoria Juárez5560
14Samuel Lara8891
15Renata Medina3540
16Joaquín Molina9289
17Fernanda Orozco7075
18Emanuel Peña4852
19Isabela Quintero8185
20Bautista Reyes6367
21Mia Santamaría10094
22--- ESPACIO EN BLANCO (FILA VACÍA 22) ---
23--- ESPACIO EN BLANCO (FILA VACÍA 23) ---
TABLA 2: Cartera de Facturas (Rango A24:D44) — Para Ejercicios 16 a 20 (Do While)
Fila A (Factura ID) B (Monto $) C (Días Vencidos) D (Estatus)
24Factura IDMonto ($)Días VencidosEstatus
25FAC-200145015
26FAC-2002120045
27FAC-20033100
28FAC-2004280090
29FAC-20056505
30FAC-200692032
31FAC-20071500
32FAC-2008410065
33FAC-200983018
34FAC-20101750120
35FAC-20115002
36FAC-2012220040
37FAC-20133900
38FAC-2014110075
39FAC-201564028
40FAC-20163150105
41FAC-201788012
42FAC-20182100
43FAC-2019145050
44FAC-20205300150

2. Taller de Ejercicios

Sección A: Ejercicios con For...Next (Tabla 1 - Filas 2 a 21)

Ejercicio 11 Cálculo Promedio de Calificaciones

Escribe un bucle For...Next (filas 2 a 21) que obtenga el promedio entre Examen 1 y Examen 2 y escriba el valor numérico obtenido en la columna D.

Ejercicio 12 Condición de Aprobado

Mediante For...Next (filas 2 a 21), evalúa la columna Examen 1 (columna B). Si la nota es mayor o igual a 60, asigna "Aprobado" en la columna D; de lo contrario, "Reprobado".

Ejercicio 13 Destacar Alumnos Sobresalientes

Recorre con For...Next la nota Examen 2 (columna C). Si es mayor o igual a 90, aplica negrita y fuente color verde a la celda del Estudiante (columna A).

Ejercicio 14 Conteo de Reprobados en Examen 1

Usa For...Next para contar cuántos estudiantes obtuvieron menos de 60 puntos en la columna B. Presenta la suma final en un cuadro MsgBox.

Ejercicio 15 Bonificación por Esfuerzo

Recorre de la fila 2 a la 21 con For...Next. Si Examen 2 es superior a Examen 1 por al menos 10 puntos, suma 2 puntos de bonificación directamente a la celda de Examen 2 (columna C).

Sección B: Ejercicios con Do While...Loop (Tabla 2 - Inicia Fila 25)

Ejercicio 16 Clasificación por Vencimiento

Usa Do While...Loop desde la fila 25. Si los Días Vencidos (columna C) son mayores a 30, escribe "Mora" en la columna D; en caso contrario, escribe "Al Día".

Ejercicio 17 Alerta Cobro Jurídico

Con Do While a partir de la fila 25, si los Días Vencidos superan los 90 días, aplica relleno rojo claro a la celda de la Factura ID (columna A).

Ejercicio 18 Suma total de Cartera Vencida

Recorre la Tabla 2 con Do While...Loop y acumula en una variable el Monto ($) de todas las facturas que tengan más de 0 días vencidos. Muestra el total en un MsgBox.

Ejercicio 19 Recargo por Infracción de Pago

Aplica con Do While un recargo del 3% directamente al Monto ($) de la columna B si los Días Vencidos son mayores a 60.

Ejercicio 20 Marcado de Facturas Especiales

Recorre las facturas mediante Do While...Loop. Si el Monto ($) es superior a $3,000 asigna el texto "Cliente VIP" en la columna Estatus (columna D).