LinkBack URL
About LinkBacks
Hi, I have a list of names from A1:A120 and I would like to create a macro that will add a new worksheet for each name in the list which would then give me 120 sheets.
If somebody could please help.
Thanks in advance.
Hi, I have a list of names from A1:A120 and I would like to create a macro that will add a new worksheet for each name in the list which would then give me 120 sheets.
If somebody could please help.
Thanks in advance.
see this virtually identical post from yesterday
http://www.excelforum.com/excel-prog...iven-list.html
My Recommended Reading:
Volatility
Sumproduct & Arrays
Pivot Intro
Email from XL - VBA & Outlook VBA
Function Dictionary & Function Translations
Dynamic Named Ranges
Give this a try:
Option Explicit Sub NewSheets() Dim LR As Long, cell As Range, RNG As Range LR = Range("A" & Rows.Count).End(xlUp).Row Set RNG = Range("A1:A" & LR) For Each cell In RNG Sheets.Add.Name = cell.Text Next cell End Sub
_________________
Microsoft MVP 2010 - Excel
Visit: Jerry Beaucaire's Excel Files & Macros
If you've been given good help, use theicon below to give reputation feedback, it is appreciated.
Always put your code between code tags. [CODE] your code here [/CODE]
?None of us is as good as all of us? - Ray Kroc
?Actually, I *am* a rocket scientist.? - JB (little ones count!)
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
Register To Reply
Bookmarks