Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Tab Names
Is there a way to change the 20 worksheets tab names to reflect what is in
the cells in Sheet1, cells A1:A20? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Tab Names
Hi there,
This would work... Sub ChangeSheetNames() Dim lSht As Long For lSht = 1 To Worksheets.Count Worksheets(lSht).Name = Worksheets(1).Cells(lSht, 1).Value Next lSht End Sub Sheet names will need to be in cells A1:A20 on the first sheet of the workbook, and sheets will be renamed in the order they appear in the sheet tabs. Ken Puls www.officearticles.com "Darren" wrote in message ... Is there a way to change the 20 worksheets tab names to reflect what is in the cells in Sheet1, cells A1:A20? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
converting email address names in a range of cells to real names | Excel Worksheet Functions | |||
using the Excel generic worksheet names instead of user-given names in code | Excel Discussion (Misc queries) | |||
Sorting and matching rows of names with Socials with master list and eliminating the extra names | Excel Worksheet Functions | |||
return all worksheet tab names and chart sheet tab names in report - an example | Excel Programming | |||
Change names of files in a folder to match names in Excel Column | Excel Programming |