Add Current Value to Previous Value of a Single Cell

jamesmustain · Dec 14th 2020

Hi,

I am exporting real time data into excel, and I would like to keep a running total of a single cell who's value is constantly changing. Lets say the values of this cell have read, 1, 3, 5, 2. I would like to be able to see another cell that is adding up these individual values and would read 11.

Any help would be appreciated!

Thanks!

**Carim** · Dec 14th 2020

Hi,

A lot depends on how data is being imported into Excel ...

For example the RTD function does not trigger any event ...

If you are using RTD/DDE, you should try to use Application.OnTime Method (Excel)

Meanwhile, you could test following event macro ... which displays the running total as well as the previous input :

Code

 Private Sub Worksheet_Change(ByVal Target As Range)
  Dim OldVal As Variant, NewVal As Variant
  If Target.Count > 1 Then Exit Sub
   Application.EnableEvents = False
    NewVal = Target.Value
    Application.Undo
    OldVal = Target.Value
     If IsNumeric(OldVal) And IsNumeric(NewVal) Then
       ' Display Running Total
       Target.Offset(0, 1).Value = NewVal + Target.Offset(0, 1).Value
       ' Display Previous Value
       Target.Offset(0, 2).Value = OldVal
    End If
    Target.Value = NewVal
  Application.EnableEvents = True
End Sub

Display More

Hope this will help

Add Current Value to Previous Value of a Single Cell

Participate now!

Share