Es comun en el trabajo con macros ejecutar una instrucción mas de una vez. Ejemplo se tienen 25.000 registros con nombre y apellido y se quieren seprar aquellos que empiezan con "Lo". La solución que aparece a nuestra vista es repetir la instrución tantas veces como se necesite. ¿No estamos locos?. Para repetir 25.000 veces la misma instrucción. Pues aqui es donde se requiere el uso de estructuras repetitivas que facilite repetir una misma instrucción tantas veces como sea necesario.
Para el presente post solo vamos a hablar de la estructura FOR ... NEXT. Su estructura de funcionamiento se muestra a continuación:
Dim contador as Integer ' Creación de un contador que va incrementando con cada ejecución
contador = 1
For contador To 25.000 ' Repita las instrucciones desde el valor del contador hasta 25000
Instrucción a repetir 25000 veces
Next contador ' Incremente el contador
Algunos ejemplos practicos
Ejemplo 1
Llenar un rango de 19 celdas con valores aleatorios
Sub LlenarRango()
Dim contador As Long
contador = 0
For contador = 0 To 19
ActiveCell.Offset(contador, 0) = Rnd
Next contador
End Sub
Ejemplo 2
Llenar el rango de las casillas A1..A5 con valores pares consecutivos empezando por el 2.
Sub Pares()
Dim Fila As Integer
Dim i As Integer
Fila = 1
For i=2 To 10 Step 2
ActiveSheet.Cells(Fila,1).Value = i
Fila = Fila+1
Next i
End Sub
Otras estructuras repetitivas a considerar.
La siguiente información es tomada literalmente de http://www.xltoday.net/vba_bucles_intro.asp
Bucles Do… Loop
Repite las instrucciones mientras/hasta etc. una condición es TRUE/VERDADERO.
Do while… Loop
Repite las instrucciones mientras una condición es TRUE/VERDADERO.
Do until… Loop
Repite las instrucciones hasta que una condición se convierta en TRUE/VERDADERO.
While… Wend
Igual al bucle Do while… Loop.
buenos dias! que bueno que encontre este blog, usualmente armo planillas de excell con algunas macros asignadas a botones, es decir trato de que el usuario no"toque" nada de la planilla excepto lo que necesita(para no borrar nada) los botones estan asignados a macros para , por ejemplo armar un base de datos pequeña con los datos de los contribuyentes, cuanto pagan en que fecha nombres diecciones etc, esta info la vuelco en unos recibieto que se imprimen (por todo el año separados por mes) para entregarselos al cobrador, hasta ahi vamos bien, pero cuando imprimo solo imprimo una planillita de recibos con todo un año solo pro un contribuyente, como puedo implementar qe repita el ciclo de impresion(siempre el mismo rango)hasta que imprima toda la lista de contribuyentes de la pequeña base? se puede hacer? graciasdssss marcelo de uruguay
ResponderBorrarEl Ejercicio 1 te manda a escribir 20 celdas... no 19
ResponderBorrar