What was the Last Cell ?

[tim.marsahll]

Hello,

I wish to record (for each line), when data in a cell was last updated.

I have the code to print the user who last modified a cell, however I need to trigger the code to execute. And record the information…

I have done this through "selection change".

**************************************************
Private Sub Worksheet_Change(ByVal Target As Range)
'Applies last updated to each line

Sheet14.Cells(ActiveCell.Row - 1, 34) = Now

End Sub
**************************************************

This works OK if the user hits return, but if the user clicks further down the sheet the information is stored against an incorrect line.

I need to use another method to give me the “Last Cell” value…?

Any ideas please…?

 

[Andrew Poulsom]

You already have that - Target is passed to the Change event procedure. Try:

Sheet14.Cells(Target.Row, 34) = Now