I have an excel document that is an inventory list. I have people in 300
rooms that need to complete the inventory list. I would like to put in one
cell the name of the person and the room #. i.e J Smith 5670 then on the
next sheet M. Jones 5690 etc. Rather than type in each name and room, I
hope to merge this information from another document.
> Hello,
>
[quoted text clipped - 9 lines]
> > name at the top of each page that is different from the previous/next page.
> > I have the names as a list on another spreadsheet.
JP - 31 Oct 2007 22:30 GMT
I think I understand. You want to create a workbook with a different
worksheet for each name. Something like this should work.
Let's say you have the names in column A, starting in A1:
Sub addsheets()
Dim X as Long
Dim i as Long
X = Activesheet.usedrange.rows.count
For i = 1 to X
Worksheets.Add(After:=Worksheets(Worksheets.count)).Name = Cells(i,1)
Next i
End Sub
I didn't test this code. Note that there may be a limit to the number
of sheets in a workbook, you may not be able to create 300 worksheets.
HTH,
JP
On Oct 31, 11:33 am, LBaldi2590 <LBaldi2...@discussions.microsoft.com>
wrote:
> I have an excel document that is an inventory list. I have people in 300
> rooms that need to complete the inventory list. I would like to put in one
[quoted text clipped - 17 lines]
>
> - Show quoted text -
LBaldi2590 - 02 Nov 2007 01:17 GMT
Thank you. I'll give it a try
> I think I understand. You want to create a workbook with a different
> worksheet for each name. Something like this should work.
[quoted text clipped - 42 lines]
> >
> > - Show quoted text -