Sumar y Acumular valores en una Celda

[castañitp]

Repetuosamente les solicito su ayuda en lo siguiente

Necesito una formula o macro que cada ves que digite un valor en la celda "A1", me sume y acumule esos valores en la celda "B1".

Ejemplo:

En A1 Digito 5, la celda b1 vale 5

Vuelvo a digitar en la celda A1 el valor 6, entonces el valor de la celda b1 seria 11

Vuelvo a digitar en la celda A1 el valor 9, entonces el valor de la celda b1 seria 20, y asi sucesivamene.

Cordial Saludo

[Antoni]

Hola:

Coloca esta macro en la hoja:

Private Sub Worksheet_Change(ByVal Target As Range)


If Target.Address(False, False) = "A1" Then Range("B1") = Range("B1") + Target


End Sub

[/CODE]

Saludos

La próxima vez recuerda que debes subir un archivo tal como mandan las Normas del Foro.