Solved: Sheet Tab naming on opening

[BENSON]

I dont know if this can be done but I will ask anyway.I have a workbook that contains one work sheet named "CHECK LIST" it resides in the excel start up folder my question is :can the date be added to the sheet name when the workbook is opened ,ie the sheet name would be, if opened today "CHECK LIST 4th Jan 08 "

THANKS

[Bob Phillips]

Private Sub Workbook_Open()
ThisWorkbook.Worksheets(1).Name = "CHECK LIST " & Format(Date, "d mmm yy")
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

[BENSON]

MANY THANKS