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

Mantenimiento de Flota de Vehículos y Atención Telefónica Call Center (10 Ejercicios)

1. Tablas de Datos para la Práctica

TABLA 1: Control de Flota Vehicular (Rango A1:D21) — Para Ejercicios 31 a 35 (For Next)
Fila A (Vehículo / Placa) B (Kilometraje) C (Consumo Gal) D (Estado Mantenimiento)
1PlacaKilometrajeConsumo GalEstado Mantenimiento
2ABC-10145000120
3ABC-10282000210
4ABC-1031500085
5ABC-104105000310
6ABC-10562000175
7ABC-1062800095
8ABC-107120000340
9ABC-10849000130
10ABC-10993000260
11ABC-11035000110
12ABC-111115000300
13ABC-112800040
14ABC-11374000190
15ABC-11451000145
16ABC-115135000390
17ABC-1162200080
18ABC-11768000180
19ABC-11898000270
20ABC-11941000115
21ABC-120150000420
22--- ESPACIO EN BLANCO (FILA VACÍA 22) ---
23--- ESPACIO EN BLANCO (FILA VACÍA 23) ---
TABLA 2: Registro de Llamadas Call Center (Rango A24:D44) — Para Ejercicios 36 a 40 (Do While)
Fila A (Agente ID) B (Tiempo Min) C (Calificación 1-5) D (Evaluación)
24Agente IDTiempo MinCalificación (1-5)Evaluación
25AGT-301125
26AGT-302252
27AGT-30384
28AGT-304351
29AGT-305153
30AGT-306422
31AGT-30755
32AGT-308184
33AGT-309281
34AGT-310105
35AGT-311223
36AGT-312312
37AGT-31364
38AGT-314195
39AGT-315451
40AGT-316143
41AGT-31795
42AGT-318272
43AGT-319114
44AGT-320381

2. Taller de Ejercicios

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

Ejercicio 31 Revisión Preventiva por Kilometraje

Escribe un bucle For...Next (filas 2 a 21). Si el Kilometraje (columna B) es mayor o igual a 80,000 km, asigna el texto "Mantenimiento Requerido" en la columna D.

Ejercicio 32 Marcado de Vehículos de Alto Consumo

Usa For...Next (filas 2 a 21) para evaluar la columna C. Si el Consumo supera los 250 galones, aplica relleno amarillo claro a la celda de la Placa (columna A).

Ejercicio 33 Cálculo de Rendimiento por Galón

Mediante For...Next (filas 2 a 21), calcula la relación de rendimiento dividiendo el Kilometraje entre el Consumo (B/C). Escribe el resultado con dos decimales en la columna D.

Ejercicio 34 Conteo de Vehículos Operativos Seminuevos

Recorre con For...Next las filas 2 a 21 para contar cuántos vehículos tienen menos de 50,000 km en la columna B. Muestra el número total obtenido en un MsgBox.

Ejercicio 35 Alerta Crítica por Mantenimiento Vencido

Construye un bucle For...Next (filas 2 a 21). Si el Kilometraje es superior a 120,000 km, cambia el texto de la celda en la columna A a color rojo y estilo negrita.

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

Ejercicio 36 Auditoría de Tiempos Excesivos

Utiliza Do While...Loop a partir de la fila 25. Si el Tiempo en Minutos (columna B) es mayor a 20, escribe "Llamada Prolongada" en la columna D.

Ejercicio 37 Identificación de Clientes Insatisfechos

Con Do While desde la fila 25, si la Calificación (columna C) es menor o igual a 2, aplica un relleno rojo claro a la celda del Agente ID (columna A).

Ejercicio 38 Suma de Tiempo Total en Llamadas Deficientes

Recorre la Tabla 2 con Do While...Loop acumulando en una variable los minutos (columna B) de las llamadas cuya calificación sea igual a 1. Despliega el acumulado en un MsgBox.

Ejercicio 39 Distintivo para Agentes Excelentes

Mediante Do While...Loop, asigna la palabra "Excelente" en la columna D si la calificación del cliente es 5 y el tiempo fue menor a 15 minutos.

Ejercicio 40 Formateo Alterno de Filas de Atención

Construye una macro Do While...Loop que empiece en la fila 25 y recorra las llamadas. Aplica un fondo azul muy claro a toda la fila si la celda de Calificación es igual a 5.