You will need to go to the Sheet object and choose the event
SheetSelectionChange

In that event (macro) insert this code:

If target.address = range("A1").address then range("A1") = date

Where A1 is the cell, if clicked on, you want the current date/time.
Format that cell to display date, time or both.

TH

On 4/22/04 2:00, in article , "Fraggs "
wrote:

Is there a way to have a cell so that when it is clicked on or something
it automaticaly enters the date. Probs get it off the computer clock
or something?

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