Solved

Create a new Blank Sheet for each value in a List

Posted on 2011-02-17
2
254 Views
Last Modified: 2012-05-11
Good Afternoon

I am looking to create a new blank Sheet for each value, from A2 on a Sheet named Data. The indication to stop creating new sheets is a blank cell in the A column.

Regards
0
Comment
Question by:Washcare
2 Comments
 
LVL 43

Accepted Solution

by:
Saqib Husain, Syed earned 500 total points
Comment Utility
Sub gensheets()
For Each cel In ActiveSheet.Range("A2", Range("A2").End(xlDown))
ActiveWorkbook.Sheets.Add
ActiveSheet.Name = cel.Value
Next cel
End Sub
0
 

Author Closing Comment

by:Washcare
Comment Utility
Many thanks
0

Featured Post

Maximize Your Threat Intelligence Reporting

Reporting is one of the most important and least talked about aspects of a world-class threat intelligence program. Here’s how to do it right.

Join & Write a Comment

Drop Down List with Unique/Distinct Values (enhancing the Combo-Box with a few steps and a little code) David miller (dlmille) Intro Have you ever created a data validation list from a database field or spreadsheet column (e.g., Zip Codes or Co…
Dealing with unintended Excel Active-X resizing quirks (VBA code simulates "self correction") David Miller (dlmille) Intro Not everyone is a fan of Active-X controls in spreadsheets (as opposed to the UserForm approach, the older Form controls …
This Micro Tutorial will demonstrate on a Mac how to change the sort order for chart legend values and decrpyt the intimidating chart menu.
This Micro Tutorial will demonstrate how to use longer labels with horizontal bar charts instead of the vertical column chart.

728 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

8 Experts available now in Live!

Get 1:1 Help Now