List Worksheets in Workbook

E

engimommy

I am trying to find a way to list all the sheets in a wookbook to use i
a macro ...
Any ideas??:confused
 
R

raehippychick

I found a handy little utility from ASAP.com (a free download) - i
lists all sheets on one sheet.

The sheet names are all clickable, but it only takes a moment to cop
and paste them as value
 
G

Gord Dibben

''list of sheet names in a workbook - placed on a new worksheet
Sub ShowNames()
Set wkbkToCount = ActiveWorkbook
iRow = 1
With Sheets.Add 'ActiveSheet
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
 
Top