Is it possible for a last updated date to be inserted into a cell in a
spreadsheet that is only updatted if the spreadsheet is changed?

'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

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Worksheets("Sheet1").Range("A1") = Format(Date, "dd mmm yyyy")
End Sub


--
---
HTH

Bob

(change the xxxx to gmail if mailing direct)


"Marie Bayes" wrote in message
...
Is it possible for a last updated date to be inserted into a cell in a
spreadsheet that is only updatted if the spreadsheet is changed?

Brilliant, thanks.

"Bob Phillips" wrote:

'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

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Worksheets("Sheet1").Range("A1") = Format(Date, "dd mmm yyyy")
End Sub


--
---
HTH

Bob

(change the xxxx to gmail if mailing direct)


"Marie Bayes" wrote in message
...
Is it possible for a last updated date to be inserted into a cell in a
spreadsheet that is only updatted if the spreadsheet is changed?

I have followed the instructions for inserting the last update date, but nothing appears on my spreadsheet. What am I doing wrong?

EggHeadCafe.com - .NET Developer Portal of Choice
http://www.eggheadcafe.com