| Fila | A (Empleado) | B (Días Trabajados) | C (Horas Extra) | D (Pago Extra $ / Estado) |
|---|---|---|---|---|
| 1 | Empleado | Días Trabajados | Horas Extra | Resultado |
| 2 | Adriana Silva | 20 | 15 | |
| 3 | Bernardo Hoyos | 18 | 0 | |
| 4 | Cristina Marín | 22 | 8 | |
| 5 | Daniel Parra | 15 | 0 | |
| 6 | Esteban Rios | 21 | 22 | |
| 7 | Fabiola Acosta | 19 | 5 | |
| 8 | Gustavo Prado | 22 | 12 | |
| 9 | Helena Beltrán | 12 | 0 | |
| 10 | Ignacio Bravo | 20 | 18 | |
| 11 | Jessica Córdoba | 21 | 3 | |
| 12 | Kevin Duarte | 17 | 0 | |
| 13 | Laura Estrada | 22 | 25 | |
| 14 | Mario Franco | 14 | 0 | |
| 15 | Nora Galeano | 20 | 10 | |
| 16 | Oscar Hurtado | 19 | 2 | |
| 17 | Patricia Jaramillo | 21 | 14 | |
| 18 | Quintín Lara | 16 | 0 | |
| 19 | Rosa Maldonado | 22 | 30 | |
| 20 | Santiago Niño | 18 | 4 | |
| 21 | Teresa Osores | 20 | 9 |
| 22 | --- ESPACIO EN BLANCO (FILA VACÍA 22) --- | |||
| 23 | --- ESPACIO EN BLANCO (FILA VACÍA 23) --- | |||
| Fila | A (Planta ID) | B (Consumo kWh) | C (Límite Máx kWh) | D (Diagnóstico) |
|---|---|---|---|---|
| 24 | Planta ID | Consumo kWh | Límite Máx kWh | Diagnóstico |
| 25 | PLANT-01 | 4500 | 5000 | |
| 26 | PLANT-02 | 6200 | 5500 | |
| 27 | PLANT-03 | 3100 | 4000 | |
| 28 | PLANT-04 | 7800 | 7000 | |
| 29 | PLANT-05 | 2900 | 3000 | |
| 30 | PLANT-06 | 8200 | 8000 | |
| 31 | PLANT-07 | 1500 | 2500 | |
| 32 | PLANT-08 | 9400 | 8500 | |
| 33 | PLANT-09 | 4100 | 4500 | |
| 34 | PLANT-10 | 5600 | 5000 | |
| 35 | PLANT-11 | 3800 | 3800 | |
| 36 | PLANT-12 | 7100 | 6500 | |
| 37 | PLANT-13 | 2200 | 3000 | |
| 38 | PLANT-14 | 8900 | 8000 | |
| 39 | PLANT-15 | 4700 | 4500 | |
| 40 | PLANT-16 | 6300 | 6000 | |
| 41 | PLANT-17 | 1900 | 2000 | |
| 42 | PLANT-18 | 8500 | 9000 | |
| 43 | PLANT-19 | 5300 | 5000 | |
| 44 | PLANT-20 | 9100 | 8500 |
For...Next (Tabla 1 - Filas 2 a 21)Escribe un bucle For...Next (filas 2 a 21). Multiplica las Horas Extra (columna C) por una tarifa de $12.50 y guarda el pago total resultante en la columna D.
Con For...Next (filas 2 a 21), evalúa si los Días Trabajados (columna B) son mayores o iguales a 22. Si es así, escribe "Bono Cumplido" en la columna D.
Recorre la columna B con For...Next (filas 2 a 21). Si el empleado trabajó menos de 16 días, aplica un fondo rojo claro a la celda del Empleado (columna A).
Usa For...Next para contar cuántos empleados realizaron más de 15 Horas Extra (columna C). Muestra el total acumulado en un mensaje emergente MsgBox.
Mediante For...Next, para aquellos empleados con más de 20 Horas Extra en la columna C, aplica una bonificación adicional directa de +2 horas al conteo registrado en la misma celda C.
Do While...Loop (Tabla 2 - Inicia Fila 25)Crea un bucle Do While...Loop desde la fila 25. Si el Consumo kWh (columna B) supera el Límite Máx (columna C), asigna el texto "Excedido" en la columna D; de lo contrario, "Normal".
Con Do While a partir de la fila 25, si el Consumo kWh es inferior al 80% del Límite Máx (Consumo < Limite * 0.8), asigna un color de texto verde a la celda de la Planta ID (columna A).
Recorre la Tabla 2 con Do While...Loop y suma en una variable la diferencia (Consumo - Límite) únicamente de las plantas con sobreconsumo. Muestra el total de kWh excedidos en un MsgBox.
Mediante Do While, si una planta excede su límite en más de 500 kWh, registra en la columna D la leyenda "Multa Grado 1".
Construye una macro Do While...Loop que empiece en la fila 25. Si el Consumo supera los 8,000 kWh, cambia el formato de fuente a **Negrita** en todo el rango de celdas de la fila (columnas A a D).