Hoy introducimos el bucle más sencillo en lenguaje VBA.
El bucle while permite repetir instrucciones mientras se cumpla una condición.
Esto hace que sea muy sencillo repetir una instrucción un número de veces usando como condición que el valor de una variable sea menor que uno dado.
Eso sí, recordad modificar el valor de la variable, o crearéis vuestro primer bucle infinito.
El código usado es el siguiente
El resultado es tan rápido que parece que solo se ha ejecutado la última instrucción. Sin embargo se ha ejecutado 99 veces.
Aquí lo podéis copiar
Sub bucleWhile()
Dim contador
contador = 1
while (contador <100)
Cells(1, 1).Value = contador
contador = contador + 1
Wend
End Sub
Es posible modificar el código añadiendo un retardo para ver como se ejecuta el código.
En la imagen una pausa de 5 segundos en cada iteración del bucle.
No hay comentarios:
Publicar un comentario