Print Spreadsheet tabs in a Workbook to a List?

Is there any way to print the names of the spreadsheet tabs in a workbook?
I would like to print a list of the 50 worksheet tabs that I have in my
workbook to a paper.
It would be ideal if the list could be produced on another spreadsheet in
this same workbook.
Any suggestions would be greatly appreciated !
Thanks !
Tim

This pdf has a macro that will do that:

http://www.nesug.org/html/Proceeding...04/po/po07.pdf

The macro is

Sub worksheet_names()
Dim WS As Worksheet
Sheets.Add.Name = "Worksheet_Names"
For Each WS In Worksheets
Cells(WS.Index, 1).Value = WS.Name
Next WS
End Sub

It will create a worksheet named "Worksheet_Names" and put the worksheet
names on it.
"Jugglertwo" wrote:

> Is there any way to print the names of the spreadsheet tabs in a workbook?
> I would like to print a list of the 50 worksheet tabs that I have in my
> workbook to a paper.
> It would be ideal if the list could be produced on another spreadsheet in
> this same workbook.
> Any suggestions would be greatly appreciated !
> Thanks !
> Tim

Hi Jugglertwo,

You might also look at David McRitchie's 'Build Table of Contents' page at:

http://www.mvps.org/dmcritchie/excel/buildtoc.htm

---
Regards,
Norman



"Jugglertwo" <[email protected]> wrote in message
news:[email protected]...
> Is there any way to print the names of the spreadsheet tabs in a workbook?
> I would like to print a list of the 50 worksheet tabs that I have in my
> workbook to a paper.
> It would be ideal if the list could be produced on another spreadsheet in
> this same workbook.
> Any suggestions would be greatly appreciated !
> Thanks !
> Tim

Tim

Macro ok?

''list of sheet names in a workbook - placed on a new worksheet
Sub ShowNames()
Set wkbkToCount = ActiveWorkbook
iRow = 1
With Sheets.Add
For Each ws In wkbkToCount.Worksheets
.Rows(iRow).Cells(1).Value = ws.Name
iRow = iRow + 1
Next
End With
End Sub


Gord Dibben Excel MVP

On Fri, 27 May 2005 09:45:14 -0700, "Jugglertwo"
<[email protected]> wrote:

>Is there any way to print the names of the spreadsheet tabs in a workbook?
>I would like to print a list of the 50 worksheet tabs that I have in my
>workbook to a paper.
>It would be ideal if the list could be produced on another spreadsheet in
>this same workbook.
>Any suggestions would be greatly appreciated !
>Thanks !
>Tim