Renaming Multiple Tabs

B

britt@wjg

I need to rename many tabs quickly and numberically (1, 2, 3, etc.). Is there
a faster way than just right-clicking and renaming each worksheet?
 
S

Sheeloo

Run this macro
Sub RenameTabs()
For i = 1 To Sheets.Count
Sheets(i).Name = i
Next
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top