I don't know exactly what you mean by "sheet number", but the following
macro will list all the sheets like you want with the sheet "number" being
the sheet tab sequence. HTH Otto
Sub ListShts()
Dim ws As Worksheet
Dim c As Long
c = 1
For Each ws In ActiveWorkbook.Worksheets
Range("A" & Rows.Count).End(xlUp).Offset(1).Value = _
"Sheet" & c & "(" & ws.Name & ")"
c = c + 1
Next ws
End Sub
"QuietMan" wrote in message
...
Does anyone know how to get the sheet number as well as the sheet name to
be
displayed in one excel worksheet

example: sheet37(foothill)
would like to be able to shoow this for all 37 sheet in one worksheet
--
Helping Is always a good thing