How to update workseet DATE on SAVE

[Scott Partridge]

I have a shared workbork where each user has a personal
worksheet that they view and/or update on a regular basis.

I have a date on each worksheet that I would like to
automatically update ONLY wen the user edits the
worksheet and saves te change, not when they simply open
it and view it.

I'm iterating to the correct solution, but some direct
guidance would help me speed up the process.

Thank you in advance for any help.

 

[Frank Kabel]

Hi
one solution could be using the worksheet event
worksheet_change. e.g. enter the following code in each of
the relevant worksheets.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
if intersect(target,me.range("A1:X100")) is nothing then
exit sub
application.enableevents=false
me.range("A1").value=date
application.enableevents=true

End Sub