Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Help to create worksheets from a list
Hi all, i have a list of names in the cells "AQ1:AQ10) and i would like to
add a sheet to the workbook for each name & would like to name that sheet with the respective name with VBA. Any help would be much appreciated. -- Les |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Help to create worksheets from a list
Try This:
Sub sheets() Dim ws As Worksheet Dim x As Integer Do Until IsEmpty(Worksheets("YOURSHEETNAME").Range("aq1").O ffset(x, 0)) Set ws = Worksheets.Add ws.Name = Worksheets("YOURSHEETNAME").Range("aq1").Offset(x, 0).Value x = x + 1 Loop End Sub "Les" wrote: Hi all, i have a list of names in the cells "AQ1:AQ10) and i would like to add a sheet to the workbook for each name & would like to name that sheet with the respective name with VBA. Any help would be much appreciated. -- Les |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Help to create worksheets from a list
100%, Thanks Sam
-- Les "Sam Wilson" wrote: Try This: Sub sheets() Dim ws As Worksheet Dim x As Integer Do Until IsEmpty(Worksheets("YOURSHEETNAME").Range("aq1").O ffset(x, 0)) Set ws = Worksheets.Add ws.Name = Worksheets("YOURSHEETNAME").Range("aq1").Offset(x, 0).Value x = x + 1 Loop End Sub "Les" wrote: Hi all, i have a list of names in the cells "AQ1:AQ10) and i would like to add a sheet to the workbook for each name & would like to name that sheet with the respective name with VBA. Any help would be much appreciated. -- Les |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
automatically create list of the worksheets | Excel Programming | |||
Create multiple worksheets from list | Excel Discussion (Misc queries) | |||
Create List from Multiple Worksheets | Excel Programming | |||
Create list of worksheets | Excel Discussion (Misc queries) | |||
Create a menu to List the Name of worksheets in a Workbook | Excel Programming |