Hi,
Firstly open the VBA editor (Alt+F11), and go to "Insert --> "Module". Then paste the following code:
To use this macro, go to the "Developer" tab on the Excel 2007 ribbon (this needs to be enabled in Excel Options if you can't see this tab, as it is disabled by default). Under the "Code" group, click on "Macros", then select "RenameSheets" from the list and click on "Options...". In this dialog you will be able to assign a keyboard shortcut to activate your macro. Once you have done this click OK/Close until you are back to the workbook, then press your keyboard shortcut to see the macro work.
Hope this helps
Bookmarks