If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Sheet Names
Hi all
I have a spreadsheet with around 20 sheets; sheet1, sheet2, sheet3 etc. Is there any shorter way to re-name them either from a list or let's say call it. Month 1, Month 2, Month 3 without having to type one by one. Thanks in advance |
#2
|
|||
|
|||
Sheet Names
Sub name_um()
i = 1 For Each ws In Worksheets ws.Name = "month " & i i = i + 1 Next End Sub -- Gary''s Student - gsnu200800 |
#3
|
|||
|
|||
Sheet Names
For i = 1 To Worksheets.Count
Worksheets(i).name = Avctivesheet.Cells(i, "A").Value Next i -- __________________________________ HTH Bob "Accor" wrote in message ... Hi all I have a spreadsheet with around 20 sheets; sheet1, sheet2, sheet3 etc. Is there any shorter way to re-name them either from a list or let's say call it. Month 1, Month 2, Month 3 without having to type one by one. Thanks in advance |
#4
|
|||
|
|||
Sheet Names
Try this code he
http://www.ozgrid.com/forum/showthread.php?t=55611 Just put your names in A1 (or A3 in this example) and run the macro. Regards, Ryan--- -- RyGuy "Accor" wrote: Hi all I have a spreadsheet with around 20 sheets; sheet1, sheet2, sheet3 etc. Is there any shorter way to re-name them either from a list or let's say call it. Month 1, Month 2, Month 3 without having to type one by one. Thanks in advance |
#5
|
|||
|
|||
Sheet Names
Your choice
Sub NameWS_List() 'name sheets with list of unique names in A1:A20 on first sheet On Error Resume Next For i = 1 To Worksheets.Count Sheets(i).Name = Sheets(1).Cells(i, 1).Value Next i End Sub Sub NameWS_Month() 'name sheets as Month 1, Month 2 etc. On Error Resume Next For i = 1 To Worksheets.Count Sheets(i).Name = "Month " & i Next i End Sub Gord Dibben MS Excel MVP On Thu, 14 Aug 2008 09:23:00 -0700, Accor wrote: Hi all I have a spreadsheet with around 20 sheets; sheet1, sheet2, sheet3 etc. Is there any shorter way to re-name them either from a list or let's say call it. Month 1, Month 2, Month 3 without having to type one by one. Thanks in advance |
Thread Tools | |
Display Modes | |
|
|