Estimados amig@s:
Estoy trabajando con un formulario con macros para ingresar datos a una hoja nombre dirección monto saldo, bueno si puedo pasar los datos del formulario con textbox y combobox mediante codigos a la hoja que corresponde del nombre dirección y monto pero en la columna de saldo quiero poner la formula =suma(d2+c1) , solo que o sea sumar al saldo el saldo anterior mas el nuevo monto, solo que en la hoja donde registro estos datos se registran nuevos datos y por ende las celdas varían d3,d4 d5 , etc.
Ayuda por favor
Saludos
Jesús
Entiendo que tienes en la columna C el monto (de las operaciones) y en la columna D el saldo.
De tal modo que en C1 tendrías el primer monto y el saldo en la celda D1 sería igual a C1
en la celda C2 tienes el segundo monto, y la celda D2 sería el saldo total que lo calculas como resultado de sumar el valor de la celda C2 + el valor de la celda D1
En la celda C3 etienes el tercer monto, y la celda D3 sería el saldo total que lo calculas como resultado de sumar el valor de la celda C3 + el valor de la celda C2....
Basta con que pongas como valor en la celda correspondiente (siendo j la fila):
Cells(4, j).FormulaR1C1 = "=SUM(R[0]C[-1],R[-1]C[0])"
'Aquí sumas el valor de la celda que está un lugar a la izquierda y un lugar hacia arriba con (por eso de usar el valor separado con una coma) con la celda que está una fila hacia arriba y en la misma columna (!OJO para la primera fila no te valdría)
Otra opción sería:
Cells(4, j).FormulaR1C1 = "=SUM(R1C[-1]:R[J]C[-1])" 'Aquí sumas todos los valores de la columna C (que es la que está un paso a la izquierda de la celda indicada) desde la fila (Row) 1 hasta (por eso tienes ":") la fila j
Prueba con lo siguiente:
Range("D3").formula = "=D2+C2"
Luego la puedes extender a todas las filas si lo necesitas.
Saludos
Estimado Cron gracias por responder, pero esto funciona cada vez que inserto una fila? porque como te digo mi base de datos que estoy haciendo incremente filas para insertar los datos y bueno lo que quiero es que de igualmanera se inserta la formular porque en este caso el número 2 seria varible, porque cambiaria a D3+c3 despues D4+C4, etc etc.
Saludos
Jesús
Jesus Martinez Plantarosa
Estimado Cron:
Encontre esto en la red y quisiera que me orientes por favor, porque puede ser lo que estoy necesitando y podria ajustarlo a lo que estoy queriendo realizar
Range("F17").End(xlDown).Offset(1, 0).Select
ActiveCell.Formula = "=SUM(R[-1]C:R18C)"
Saludos
Jesús
Jesus Martinez Plantarosa
Si quieres que funcione cada vez que añades una fila, quizás lo mejor es que te crees una tabla.
La fórmula que mencionas lo que hace es añadir la fórmula que te puse antes al final del rango. Sin embargo, si te creas una tabla, esto lo hará automáticamente Excel, y te evitarás tener que programarlo.
Un saludo
No manejare tabla porque no concuerda con mi macro que estoy elaborando, y en la formula que me indicas cambia cada vez que inserto una fila?
SAludos
Jesús
Jesus Martinez Plantarosa