I would appreciate someone helping me with this.

I want to run this macro each time cell R1C8 exceeds 50.
I think I need a nested loop setup, but cannot make one
work.

}:-)

Sub reset()
Application.Goto Reference:="R4C5"
Selection.Copy
Application.Goto Reference:="R3C5"
Selection.PasteSpecial Paste:=xlValues,
Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End Sub