Time Keep in excel sheet

[Guest]

How do I calculate the amount of time a user spents on a sheet, and when he closes the sheet, the timer will store the total amount of time spent in another excel sheet? Thanx.

 

[Nigel]

One way... behind the sheet you wish to record the time the user is on this
sheet, put the following code, when the sheet is activated the start time is
stored, when deactivated the difference is recorded in Sheet 2 cell A1 -
format this cell as Time. This will only record the last activate-deactivate
event. I hope this provides a useful template.

Option Explicit
Public StartTime As Date
Public UserTime As Date

Private Sub Worksheet_Activate()
StartTime = Now
End Sub

Private Sub Worksheet_Deactivate()
UserTime = Now - StartTime
Worksheets(2).Range("A1").Value = UserTime
End Sub


Cheers
Nigel

How do I calculate the amount of time a user spents on a sheet, and when

he closes the sheet, the timer will store the total amount of time spent in
another excel sheet? Thanx.