naming worksheets
My workbook has 200 worksheets named with the default names ie: worksheet1,
worksheet2...worksheet200. I would like to rename all worksheets with just the consecutive number ie: 1,2,3...200. Is there a method to do this quickly or do I need to go in and rename each one individually. Thanks. -- Shooter |
Hi Shooter
you can use a little code routine such as Sub namesheets() Sheets(1).Activate For i = 1 To 200 Sheets(i).Name = i Next End Sub to use this: 1) right mouse click on any sheet tab, choose view code 2) choose insert module in the vbe window 3) copy & paste the above into the white sheet of paper on the right of your screen 4) use ALT & F11 to switch back to your workbook 5) choose tools / macro / macros - namesheets and press the RUN Button Hope this helps Cheers JulieD "Shooter" wrote in message ... My workbook has 200 worksheets named with the default names ie: worksheet1, worksheet2...worksheet200. I would like to rename all worksheets with just the consecutive number ie: 1,2,3...200. Is there a method to do this quickly or do I need to go in and rename each one individually. Thanks. -- Shooter |
All times are GMT +1. The time now is 06:18 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com