Cell Range last modified formula/macro

[tigerlily33]

Hi,

I'm looking for a macro or formula to use so that each time data in each individual row is modified on the spreadsheet, it records the date it was last modified in column J for each row/

I've tried various macros but am also slightly unsure of how to use them.

I'm using Excel 2013, if anyone could help I'd be really grateful!

 

[JoeMo]

Welcome to the board.

Here's some sheet code you can use.

To install the code:
1. Right-click the worksheet tab you want to apply it to and choose 'View Code'. This will open the VBE window.
2. Copy the code below from your browser window and paste it into the white space in the VBE window.
3. Close the VBE window and Save the workbook. If you are using Excel 2007 or a later version do a SaveAs and save it as a macro-enabled workbook (.xlsm file extension).
4. Make sure you have enabled macros whenever you open the file or the code will not run.

Private Sub Worksheet_Change(ByVal Target As Range)
With Application
    .EnableEvents = False
    .ScreenUpdating = False
End With
Cells(Target.Row, "J") = Date
Columns("J").AutoFit
With Application
    .EnableEvents = True
    .ScreenUpdating = True
End With
End Sub

 

[tigerlily33]

Hi Joe,

That's worked perfectly. Thanks so much for your help!

 

[tigerlily33]

Sorry Joe, spoke to soon!

Is there a way of recording this in column J, row 2 downwards? I have titles in row A and need them to not be affected by the macro.

Thanks!

 

[JoeMo]

Sorry Joe, spoke to soon!

Is there a way of recording this in column J, row 2 downwards? I have titles in row A and need them to not be affected by the macro.

Thanks!

Like this:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 1 Then Exit Sub
With Application
    .EnableEvents = False
    .ScreenUpdating = False
End With
Cells(Target.Row, "J") = Date
Columns("J").AutoFit
With Application
    .EnableEvents = True
    .ScreenUpdating = True
End With
End Sub

 

[tigerlily33]

Thank you so much!