Private Sub Workbook_Open()

Worksheets("Sheet1").Range("A1").Value = Now
End Sub

'This is workbook event code.
'To input this code, right click on the Excel icon on the worksheet
'(or next to the File menu if you maximise your workbooks),
'select View Code from the menu, and paste the code


--
__________________________________
HTH

Bob

"TJ" wrote in message
...
Good day,

I have a spreadsheet where when this is opened I would like the time/date
it
was opened to be static so I can know when the last changes were made.

I have created a macro button for paste special but is there away to do
this
without clicking somewhere meaning as soon as the file is opened the time
/date gets stamped in a particulr cell without hitting save?

Appreciate anyone's help on this

thanks
TJ