Módulo 8: Bucles en VBA (For, Do While, Do Until)

📘 Módulo 8: Bucles en VBA (For, Do While, Do Until)

En este módulo aprenderás a usar los bucles en VBA para repetir instrucciones varias veces de forma automática. Los bucles son fundamentales para automatizar tareas en Excel sin escribir la misma línea de código una y otra vez.

✅ Bucle `For...Next`

El bucle For se usa cuando sabemos exactamente cuántas veces queremos repetir una acción.

Sub ContarDel1Al5()
    Dim i As Integer
    For i = 1 To 5
        MsgBox "Número: " & i
    Next i
End Sub

📌 Este ejemplo muestra un cuadro de mensaje con los números del 1 al 5.

✅ Bucle `For Each`

Se utiliza para recorrer colecciones u objetos (por ejemplo, todas las celdas de un rango).

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

📌 Este código escribe “Hola” en las celdas de A1 a A5.

✅ Bucle `Do While`

Repite el código mientras una condición sea verdadera.

Sub BucleDoWhile()
    Dim i As Integer
    i = 1
    
    Do While i <= 5
        MsgBox "Iteración: " & i
        i = i + 1
    Loop
End Sub

📌 Muestra mensajes hasta que la variable i llega a 5.

✅ Bucle `Do Until`

Se ejecuta hasta que la condición se vuelva verdadera.

Sub BucleDoUntil()
    Dim i As Integer
    i = 1
    
    Do Until i > 5
        MsgBox "Contador: " & i
        i = i + 1
    Loop
End Sub

📌 Hace lo mismo que el anterior, pero con una lógica inversa.

📝 Ejercicio 8️⃣: Llenar celdas automáticamente

Crea un macro que:

Pregunte cuántos números quieres escribir en la columna A.
Use un bucle For para escribir los números del 1 hasta ese número en las celdas A1, A2, A3, etc.

En el próximo módulo aprenderemos a crear funciones personalizadas (UDF) en VBA para usar en Excel.

Universo de unos y ceros

Módulo 8: Bucles en VBA (For, Do While, Do Until)