Menu

Rename of sheets by macro

Search this Thread

Prev

Previous Post

Next Post

Next

#5

Report Post

Posted to microsoft.public.excel.misc

Don Guillett Don Guillett is offline

Don Guillett is offline

external usenet poster

Posts: 10,124

Default

Rename of sheets by macro

Glad to help

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Harshad" wrote in message
...
Dear Mike & Don,

Don,
Your macro works very fine. Thank you.

Mike,
It's very nice that i can utilize both macro in a single code. It also
works
very fine, but again the problem of sheet order is there.
I want it as order : Main, Content, Micro, Help, NN1, NN2.......NN51.

But it shows the order: Main, Help, NN1, NN2,...,NN51, Content, Micro.

Kindly revert back.

"Mike H" wrote:

Why not do it all in one go when you add them

Sub Sheet_addition()
Dim i As Long
On Error GoTo endit
Application.ScreenUpdating = False
For i = 1 To 52
Sheets.Add after:=Sheets(i)
If i 1 Then ActiveSheet.Name = "NN" & i - 1
Next i
endit:
Sheets("Sheet1").Name = "Main"
Sheets("Sheet2").Name = "Content"
Sheets("Sheet3").Name = "Micro"
Sheets("Sheet4").Name = "Help"
Application.ScreenUpdating = True
End Sub

Mike

"Harshad" wrote:

i have Sheet1 to Sheet 55 in my workbook.

I want Sheet1 rename as Main, sheet2 as Content, sheet3 as Micro,
sheet4 as
Help, sheet5 as NN1, sheet6 to sheet55 as NN2 to NN50.

Sugest macro.

Thanks

Reply With Quote

Reply With Quote

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Posting Rules
Smilies are On [IMG] code is On HTML code is Off Trackbacks are On Pingbacks are On Refbacks are On

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Macro To Delete/Add & Rename/Arrange Sheets	steven.holloway	Excel Discussion (Misc queries)	5	June 13th 08 06:40 PM
Auto Rename Excel Sheets in Workbook	Kulin Shah	Excel Worksheet Functions	12	December 25th 06 03:27 PM
TO RENAME & COLOR THE SHEETS	Ashwini	Excel Discussion (Misc queries)	1	September 11th 06 01:20 PM
How do I rename multiple sheets at one time in Excel?	Navigator	Excel Worksheet Functions	1	July 25th 06 07:51 PM
Add Sheets and rename	GregR	Excel Discussion (Misc queries)	13	February 13th 05 10:56 PM

All times are GMT +1. The time now is 05:10 AM.

About Us

"It's about Microsoft Excel"

Contact Us ExcelBanter forum home Privacy Statement