Excel simulation help (Auto copy and paste)

Originally Posted by MarvinP

Hi beamer,

"Each time the sheet is edited" implies you need an EVENT macro that lives behind the worksheet. The event is "On_Change" and will trigger whenever something on that worksheet is changed. Then you need to find the LastRow in Column A and put something in it. I guess showing you is easier than telling you. See the attached with this code.

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim LastRow As Double
    Application.EnableEvents = False
    LastRow = Cells(Rows.Count, "A").End(xlUp).Row
    Cells(LastRow + 1, "A") = Now()
    Application.EnableEvents = True
End Sub

Attachment 469034

Thank you for your quick response! Unfortunately, I do not know how to code in excel. Could you please send me the code and tell me where I should paste it?