Hi agzil,
Here is some code that adds a formula in the cells in Column B to keep a running total, starting with Range B3. If you insert it outside of your "For Coin - Next Coin" loop, it should work.
Hope that helps,![]()
' Add Running total to Column B For i = 3 To Cells(Rows.Count, 1).End(xlUp).Row Range("B" & i).Formula = "= A" & i & " + B" & (i - 1) Next i
Dan
Bookmarks