MACRO TO RENAME SHEET !

[Jay Dean]

I have 2 Excel Workbooks -- Book1 and Book2.
I want a code that will rename Sheet1 of Book1 whatever the value in
cell A1 in Sheet2 of Book2 is.

Any assistance would be appreciated. Thanks!

Jay Dean

 

[Don Guillett]

try this
sheets("sheet1").name=workbooks("book1.xls").sheets("sheet2").range("a1")

 

[GB]

Does this work?

Workbooks("Book1").Sheets(1).Name =
Workbooks("Book2").Sheets(2).Range("A1").Value

GB

 

[Jay Dean]

No, I tried it but it did not work.

Does this work?

Workbooks("Book1").Sheets(1).Name =
Workbooks("Book2").Sheets(2).Range("A1").Value

GB

 

[GB]

No, I tried it but it did not work.

Ahem - what happened? It works on my machine and Don Guillett posted almost
identical code.

BTW, you said that your spreadsheets are called Book1 and Book2. You may
have meant Book1.xls and Book2.xls. Have you put the correct names in?

GB