If cell A1 contains the date, then

Worksheets(1).Name = Year(Range("A1").Value)


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"Pieman" wrote in message
...
Hi

Is it possible to change the name of a worksheet tab to show
the current
year and another sheet to show the previous year? If it helps,
each sheet
has the
correct year in one of the cells using the TODAY function.

I expect the only way to do this is using the VB editor, but
does anyone
know the code to achieve this?

Thanks
Simon