Llenar celdas automáticamente
Usuario
Quiero llenar unas celdas automáticamente utilizando vba, algo similar a:
For i = 1 To 10
[ai] = i
Next i
For i = 1 To 10
[ai] = i
Next i
Experto
Hola:
A eso mismo solo tenés que agregarle la primer celda donde se comenzará a llenar.
Ejemplo: lleno la col A desde la fila 5, con valores que van de 1 a 10
Sub LlenandoCeldas()
'macro desarrollada por Elsamatilde el 20/11/05
Dim fila, i as integer
fila = 5
Cells(fila, 1).select '1 es col A
For i = 1 to 10
cells(fila,1) = i
fila = fila+1
next i
End Sub
Esta rutina que irá en un módulo del Editor tendr´s que ajustarla a tu necesidad, es solo una idea.
Si esto resuelve tu consulta, no olvides finalizar.
Saludos
Elsa
*** No te pierdas el nuevo Manual 400Macros .... Más teoría, más imágenes, más rutinas....
http://es.geocities.com/lacibelesdepunilla/manual
A eso mismo solo tenés que agregarle la primer celda donde se comenzará a llenar.
Ejemplo: lleno la col A desde la fila 5, con valores que van de 1 a 10
Sub LlenandoCeldas()
'macro desarrollada por Elsamatilde el 20/11/05
Dim fila, i as integer
fila = 5
Cells(fila, 1).select '1 es col A
For i = 1 to 10
cells(fila,1) = i
fila = fila+1
next i
End Sub
Esta rutina que irá en un módulo del Editor tendr´s que ajustarla a tu necesidad, es solo una idea.
Si esto resuelve tu consulta, no olvides finalizar.
Saludos
Elsa
*** No te pierdas el nuevo Manual 400Macros .... Más teoría, más imágenes, más rutinas....
http://es.geocities.com/lacibelesdepunilla/manual
Experto
Podes repreguntar si te ha quedado alguna duda, pero si el tema ya ha sido resuelto por favor finaliza la consulta.
Saludos
Saludos
Usuario
Muchísimas gracias por tu amabilidad, saludos desde barcelona