I'm a bit confused ... do you want this to happen for every cell on the
worksheet?

In any event there is no good way to capture a click on a worksheet. You can
capture a double-click or a right-click, for example:

Private Sub Worksheet_BeforeDoubleClick(ByVal _
Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("A:A")) Is Nothing Then
Cancel = True
Target = Time
End If
End Sub

Placing this code in the worksheet code module will cause any cell in column
A to be updated with the system time when double-clicked.

--

Vasant




"imr " wrote in message
...
Hi Vasant,

Thanks for the solution, but it works for the particular cell
alone. It appears that i have to code for each cell.

Is there anyway to generalise the code, so that wherever i click on the
worksheet, the system time at that particular moment is updated and the
cell is also protected after this.

Please do let me know.

Regards
imr


---
Message posted from http://www.ExcelForum.com/