Tabla de contenido
Aunque no se utiliza con mucha frecuencia en este sitio, es posible que se encuentre en una situación en la que desee utilizar el Hacer hasta bucle 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 como entero
i = 1
Hacer hasta i> 6
Celdas (i, 1) .Valor = 20
yo = yo + 1
Lazo
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).
