Módulo 5: Bucles en VBA

📘 Módulo 5: Bucles en VBA

Los bucles permiten ejecutar un bloque de código varias veces sin tener que escribirlo repetidamente. En VBA tenemos varios tipos: For...Next, For Each...Next, Do While...Loop y Do Until...Loop.

---

✅ For...Next

Sirve para repetir un bloque de código un número definido de veces.

Dim i As Integer For i = 1 To 5 MsgBox "Número: " & i Next i

📌 Este bucle mostrará los números del 1 al 5.

---

✅ For Each...Next

Se utiliza para recorrer elementos de una colección (como celdas en Excel).

Dim celda As Range For Each celda In Range("A1:A5") celda.Value = "Hola" Next celda

📌 Es ideal cuando trabajamos con rangos de Excel.

---

✅ Do While...Loop

Repite el bloque de código mientras la condición sea verdadera.

Dim n As Integer n = 1 Do While n <= 3 MsgBox "Iteración: " & n n = n + 1 Loop

---

✅ Do Until...Loop

Repite el bloque de código hasta que la condición se vuelva verdadera.

Dim x As Integer x = 1 Do Until x > 3 MsgBox "Valor: " & x x = x + 1 Loop

---

📌 Buenas prácticas

• 🔹 Usa For...Next cuando sepas exactamente cuántas veces repetir el bloque.
• 🔹 Prefiere Do While o Do Until para condiciones indefinidas.
• 🔹 Evita bucles infinitos; asegúrate de que la condición cambie dentro del bucle.

---

📝 Ejercicio 5️⃣: Mostrar múltiplos de 3

Crea un programa que:

1. Use un bucle For para recorrer los números del 1 al 15.
2. Muestre solo los números que sean múltiplos de 3.

✅ Código VBA sugerido:

Sub MultiplosDeTres() Dim i As Integer For i = 1 To 15 If i Mod 3 = 0 Then MsgBox i & " es múltiplo de 3" End If Next i End Sub

---

En el próximo módulo veremos cómo trabajar con rangos y celdas en Excel desde VBA, para automatizar tareas directamente en nuestras hojas.