Aunque no se usa con mucha frecuencia en este sitio, es posible que se encuentre en una situación en la que desee usar el bucle Do until en Excel VBA . El código colocado entre Do until y Loop se repetirá hasta que la parte posterior a Do until sea verdadera.
Coloque un botón de comando en su hoja de trabajo y agregue las siguientes líneas de código:
Dim i As Integer
i = 1
Do Until i > 6
Cells(i, 1).Value = 20
i = i + 1
Loop
Resultado al hacer clic en el botón de comando en la hoja:
Explicación: hasta que i sea mayor que 6, Excel VBA coloca el valor 20 en la celda en la intersección de la fila i y la columna 1 e incrementa i en 1. Como resultado, el valor 20 se colocará en la columna A seis veces (no siete porque Excel VBA se detiene cuando i es igual a 7).
4/11 Completado! Obtenga más información sobre los bucles>
Capítulo siguiente: Errores de macro