por Hola a todos, espero que estéis disfrutando de este espléndido fin de semana!.
Antes de salir a dar el paso de la tarde, he decidido escribir un post sobre los principales bucles o loops que podemos programar en VBA.
Sobre este tema ya desarrollé en su momento (2016) un post en el que explicaba cuatro tipos de bucles: For – next, Do – While, Do – Until y Do While Booleana (esta última una variante de la anterior.
Como no me gusta volver a repetir y escribir lo mismo, os dejo la referencia al post: ¿CÓMO REALIZAR UN BUCLE EN VBA?
En aquel momento decidí no incluir un 5 tipo, pero creo que es necesario para que el post quede completo y mejorado 🙂
Se trata de la instrucción For-Each (aquí tenéis su definición: Instrucción For-Each), en el ejemplo que nos ocupa:
Al igual que el resto de bucles, en este ejemplo si los números de la columna 1 son mayores de 5 entonces en la columna F pondremos «Mayor que 5» y si es menor o igual a 5 entonces pondremos «Menor o igual a 5» .
La programación de la instrucción sería así:
Sub FOR_EACH()
Dim i As Double
Dim celda As Object
With Sheets(1)
Fin = Application.CountA(.Range("A:A"))
For Each celda In .Range("A2:A" & Fin)
If celda > 5 Then celda.Offset(0, 5) = "Mayor que 5"
If celda <= 5 Then celda.Offset(0, 5) = "Menor o igual a 5"
Next celda
End With
End Sub
Como podéis observar su programación es sencilla, y en en este caso he utilizado Offset para hacer referencia a la columna 6 de la nuestra tabla y así poder mostrar el valor que queremos indicar.
Este es el resultado de todos los bucles aplicados:
Descarga el archivo de ejemplo pulsando en: PRINCIPALES BUCLES EN VBA
¿Te ha resultado de interés?, puedes apoyar a Excel Signum con una pequeña donación.
¡¡Muchas gracias!!
Mediante la suscripción al blog, la realización comentarios o el uso del formulario de contacto estás dando tu consentimiento expreso al tratamiento de los datos personales proporcionados según lo dispuesto en la ley vigente (LOPD). Tienes más información al respecto en esta página del blog: Política de Privacidad y Cookies
