Sub sheetname1()
Worksheets.Add.Name = Format(Now(), "dddd-mmm-yy")
End Sub

NOTE: can be done only once a day.


Gord Dibben MS Excel MVP

On Fri, 12 Jan 2007 13:37:00 -0800, Publius
wrote:

I have a macro recorded that creates a new worksheet (each day) and it will
allow me to rename the new sheet, but I cannot figure out how to make it put
the date "NOW" in as the new worksheet's name and leave it named that date
forever. Can anyone tell me how to do it?