Sumar Celda Anterior Sucesivamente

17/11/2003 - 03:30 por Compumakro | Informe spam
Amigos
En la columna 11 (o sea la K) hay un rango de celdas de la 5 a la 10 que
reciben el resultado de suma de celdas de la misma fila. Pero como le hago
para que me sume además la celda anterior de la columna K para el acumulado?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
For i = 5 To 10
Cells(i, 11) = Cells(i, 3) + Cells(i, 5) + Cells(i, 7) + Cells(i, 3)
Next i
End Sub

Hasta aquí todo bien, (digo yo). Ahora cómo hago para dar la instrucción
para que se sume de la celda "K6" + "K5", luego la "K7" + "K6" y así
sucesivamente hasta la celda "K10" ?
Gracias y Saludos

Oscar
Barranquilla
 

Leer las respuestas

#1 Víctor
17/11/2003 - 08:51 | Informe spam
Supongo que tienes razones muy poderosas para utilizar
código VBA en una simple suma. Suponiendo que ese rango
de celdas esté comprendido entre las columnas A y J, por
ejemplo, ¿no puedes colocar en K5 la fórmula =SUMA(A5:J5)
y el K6 =SUMA(A6:J6)+K5.. y así sucesivamente? ¿O no
he entendido bien tu problema?

:-)


Amigos
En la columna 11 (o sea la K) hay un rango de celdas de


la 5 a la 10 que
reciben el resultado de suma de celdas de la misma fila.


Pero como le hago
para que me sume además la celda anterior de la columna


K para el acumulado?

Private Sub Worksheet_SelectionChange(ByVal Target As


Range)
For i = 5 To 10
Cells(i, 11) = Cells(i, 3) + Cells(i, 5) + Cells(i,


7) + Cells(i, 3)
Next i
End Sub

Hasta aquí todo bien, (digo yo). Ahora cómo hago para


dar la instrucción
para que se sume de la celda "K6" + "K5", luego la "K7"


+ "K6" y así
sucesivamente hasta la celda "K10" ?
Gracias y Saludos

Oscar
Barranquilla


.

Preguntas similares