Timestamps when cell data changes

[lol.xls]

I have data that will either be entered in F3 or F14. I need some code that will insert a timestamp in L32 if F3 or F14 are edited. Any ideas?

 

[Trebor76]

Hi lol.xls,

Put this event macro onto the sheet in question:

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Address = "$F$3" Or Target.Address = "$F$14" Then
        Range("L32").Value = Evaluate("T(""""&TEXT(NOW(), ""ddd d-mmm-yyyy"") & "" "" & LOWER(TEXT(NOW(), ""h:mm.ssAM/PM"")))") 'Date and time stamp
    End If

End Sub

HTH

Robert

 

[xladept]

Hi lol.xls,

You could put this code in the relevant Sheet:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "F3" Or Target.Address = "F14" Then Range("L32") = Time
End Sub

 

[lol.xls]

Neither of those triggered a timestamp to be input into L32. I also left out an important fact out of my original post, In my workbook, when a new report is generated, a value is automatically placed in F3 (which should generate the timestamp), however, the user should have the ability to manually enter a timestamp in F14. So the code i'm working on should automatically assign a timestamp when a report is generated, or mirror the value (if the user enters one) from L14....I may be way over complicating this. Sorry.

 

[lol.xls]

Trebor, I did get your code to work as you sent it, but i had to change the Change event to:
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

 

[xladept]

Hi lol.xls,

I redid it and it works for me with the $ signs:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$F$3" Or Target.Address = "$F$14" Then Range("L32") = Time
End Sub

Trebor's code and mine are essentially the same - you shouldn't need the SelectionChange - just the change is far less tricky!

 

[lol.xls]

Touche! Thank you very much!

 

[WarriorJ]

Ok,

This looks like it might work for my application, but I have to do this to many cells. I would like to have a range of cells that create a time stamp on corresponding cells in another worksheet when data is entered. Any ideas?

 

[xladept]

Ok,

This looks like it might work for my application, but I have to do this to many cells. I would like to have a range of cells that create a time stamp on corresponding cells in another worksheet when data is entered. Any ideas?

You could just test for the column (or) row of the target - can you be more specific??