Loopy?

A

AnthonyG

I have a constant value in A3
and wish to put values in A4
that will change.
I want A5 to total A3 and the values
in A4.
I can only get my formulas to add A3
and the new input value of A4.
How can I capture the running total so
A5 accumulates when I input new values
into A4 ?

Regards Ant.
 
D

Don Guillett

Right click sheet tab>view code>insert this>modify to suit>SAVE

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Address = "$A$4" And IsNumeric(Target) Then _
Range("a5").Value = range("a3")+ Range("a5") + Target
Application.EnableEvents = True
End Sub
 
Top