Automatic worksheet name from cell on that worksheet (A2)
 

I have a workbook with 20+ worksheets and want each tab to reflect what is in
A2 of the respective worksheet.

Automatic worksheet name from cell on that worksheet (A2)
 

After verifying that the names in A2 are valid worksheet names, run:

Sub wwwwwnameit()
Dim w As Worksheet
For Each w In Worksheets
w.Activate
w.Name = Range("A2").Value
Next
End Sub
--
Gary''s Student


"Rob" wrote:

I have a workbook with 20+ worksheets and want each tab to reflect what is in
A2 of the respective worksheet.