Create worksheet index

[index]

Hi there,

Is there anyway I can user a macro to create an index of all the
worksheets in a workbook?

Ideally it'll create a worksheet at the front of my book listing the
names of the worksheets which follow in the same book?

Can anyone help please?

 

[J.E. McGimpsey]

Take a look here:

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

 

[Anders S]

Here's a quick and dirty that might get you started

'-----
Option Explicit
Sub makeIndex()
Dim shNum As Integer
Worksheets.Add before:=Sheets(1)
For shNum = 2 To Sheets.Count
Range("A" & shNum - 1).Value = Sheets(shNum).Name
Next
End Sub
'-----

HTH
Anders Silven

 

[index]

Thanks for your hel