Name Worksheet based on cell value

Hi all,

I want to name all my sheets in my workbook based on the value in cell B1 on each sheet

I found a code on MSDN but for the life of me i cant get it to run, no idea what i am doing wrong. I am new enough to vba, but i am filling in all the areas with my cells but no joy.

Please Login or Register  to view this content.

Any help be great as i have 60 sheets to name

Yes but even it i change it to

Please Login or Register  to view this content.

It returns the error "Object Required"

I am putting the code into its own Module

I have only changed the reference of the cell value to the cell I want - "$B$1"

I want it to name the sheet when i run the code

So I had just googled that code, and got it off MSDN but most of it was unnecessary.

I have found a much easier code to work with

Please Login or Register  to view this content.

This will do for me.

Thanks for your help