
Llenar celdas hoja Excel mediante un bucle
Publicado por BlackZir (2 intervenciones) el 19/04/2018 23:24:04
Hola. estoy comenzando con esto de las macros en vb. tengo este problema:
necesito llenar en una hoja de excel el rango de celdas A1:S1 con unos datos guardados en variables respectivamente(variable1,variable2...variable20). en resumen:
Al darle clic a un boton de comando "Grabar"
estaba intentando este codigo pero me graba el mismo valor en todas las celdas, pero el valor no es el que esta guardado en las variables
resultado en todas las celdas = 1
Agradesco de antemano cualquier ayuda.
necesito llenar en una hoja de excel el rango de celdas A1:S1 con unos datos guardados en variables respectivamente(variable1,variable2...variable20). en resumen:
1
2
3
4
5
6
celda A1 = Variable1
celda B1 = Variable2
.
.
.
celda S1=Variable20
Al darle clic a un boton de comando "Grabar"
estaba intentando este codigo pero me graba el mismo valor en todas las celdas, pero el valor no es el que esta guardado en las variables
1
2
3
4
5
6
7
8
9
10
11
12
13
Variable1=Dato1
Variable2=Dato2
.
.
Variable20=Dato20
ult_c = 20
ult_f = Sheets("Hoja1").Range("A65536").End(xlUp).Row + 1
For pri_c = 1 To ult_c
For fila_i = 1 To ult_f
Sheets("Hoja1").Cells(fila_i, pri_c) = Variable & fila_i
Next fila_i
Next pri_c
resultado en todas las celdas = 1
Agradesco de antemano cualquier ayuda.
Valora esta pregunta


0