Automate Insert Worksheet & Name

[Benjamin]

I have a list of Tab Names. Is there any way to automate the process of
inserting a new worksheet and naming it from the list?

List
A
B
C
D
Etc.

To make Worksheets A, B, C, and D?

thanks

 

[Gord Dibben]

Sub Add_Sheets22()
Dim rCell As Range
For Each rCell In Range("A1:A10")
With Worksheets.Add(After:=Worksheets(Worksheets.Count))
.Name = rCell.Value
End With
Next rCell
End Sub

Assumes you are running the macro from the activesheet holding the proposed
names in A1:A10


Gord Dibben MS Excel MVP

 

[Gord Dibben]

I interpreted the request to add("inserting") sheets, not rename existing ones.


Gord