Double Click for Time
 

I am trying to put together a sheet that will have several cells that when
double-clicked on, they will put the current time there. (i.e. this is for
timing events as the happen and say cell B3 corresonds to that event, I want
to double-click on it to record when it happend).
Anyone have some ideas on how to proceed?
Thanks,
BradK

Double Click for Time
 

Brad:

reference doubleclick event

'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''
'if youe Sheet name is "Sheet1"
'Paste in the following code to Thisworkbook
Private Sub Workbook_Open()
Worksheets("Sheet1").OnDoubleClick = "activeTime"
End Sub

'Add a VBA module to your project and add this code to it.
Sub activeTime()
ActiveCell = Now()
End Sub
'''''''''''''''''''''''''''''''''''''''''''''''''' '''''

Save and close the workbook
open the workbook again

--
天行å�¥ï¼Œå�›å*�以自強ä¸�æ�¯
地勢å�¤ï¼Œå�›å*�以厚德載物

http://www.vba.com.tw/plog/


"Brad K." wrote:

I am trying to put together a sheet that will have several cells that when
double-clicked on, they will put the current time there. (i.e. this is for
timing events as the happen and say cell B3 corresonds to that event, I want
to double-click on it to record when it happend).
Anyone have some ideas on how to proceed?
Thanks,
BradK