Bucle para insertar fórmulas con macro urgente
Tengo un problema con las macros. Quizá me puedais ayudar. Tengo que introducir una fórmula en muchas celdas de la misma columna, la fórmula es:
B2*($I$2:$I$13;D2;1)+INDICE($J$2:$J13;D2;1)
B2 y d2 varia con la fila en la que lo quiero introducir.
Estoy utilizando:
for j=3 to 150
b=Cells(j,2)
d=Cells(j,4)
Cells(j,5).Formula="="& B & "*index(I2:I13," & D & "1)+index(J2:j13," & D &"1)"
next j
Estoy desesperada.. No consigo que funcione y necesito aprender a introducir fórmulas así, ya que tengo que repetirlo muchas veces.
Un saludo.
B2*($I$2:$I$13;D2;1)+INDICE($J$2:$J13;D2;1)
B2 y d2 varia con la fila en la que lo quiero introducir.
Estoy utilizando:
for j=3 to 150
b=Cells(j,2)
d=Cells(j,4)
Cells(j,5).Formula="="& B & "*index(I2:I13," & D & "1)+index(J2:j13," & D &"1)"
next j
Estoy desesperada.. No consigo que funcione y necesito aprender a introducir fórmulas así, ya que tengo que repetirlo muchas veces.
Un saludo.
1 Respuesta
Respuesta de excelforo - Ismael Romero
1
Prueba mejor con:
For j = 3 To 150
'B = Cells(j, 2)
'D = Cells(j, 4)
Cells(j, 5).Formula = "=B" & j & "*index(I2:I13,D" & j & ",1)+index(J2:J13,D" & j & ",1)"
Next j
olvidate de:
B = Cells(j, 2)
D = Cells(j, 4)
tal cual explicas con la fórmula:
=B2*($I$2:$I$13;D2;1)+INDICE($J$2:$J13;D2;1)
Así debería funcionarte.
Echa un vistazo a:
http://excelforo.blogspot.com/2011/02/vbainsertar-una-funcion-con-macros.html
For j = 3 To 150
'B = Cells(j, 2)
'D = Cells(j, 4)
Cells(j, 5).Formula = "=B" & j & "*index(I2:I13,D" & j & ",1)+index(J2:J13,D" & j & ",1)"
Next j
olvidate de:
B = Cells(j, 2)
D = Cells(j, 4)
tal cual explicas con la fórmula:
=B2*($I$2:$I$13;D2;1)+INDICE($J$2:$J13;D2;1)
Así debería funcionarte.
Echa un vistazo a:
http://excelforo.blogspot.com/2011/02/vbainsertar-una-funcion-con-macros.html
