First make sure none of the old names are the same as the new names (we can't
have two sheets with the same name) The enter and run:
Sub sheetorg()
n = 1
For Each w In Worksheets
w.Name = Format(n, "000")
n = n + 1
Next
End Sub
If you not familiar with macros, see:
http://www.mvps.org/dmcritchie/excel/getstarted.htm
--
Gary's Student
"Shahzad Zameer" wrote:
Dear All,
Can anyone help me? I have a workbook & have more than 400 worksheets in
that file. I want to rename all worksheets at a time i.e. 001 to 400 and so
on. Is there any way to solve my problem? I tried to search but couldn't find
specifically.
Thank you in advance.
--
Shahzad Zameer