How about creating a summary page...
You can download ASAP at the following link:
And create a summary sheet.
Or you can make your own. Try the following code in the Module for ThisWorkbook:
Code:Private Sub Workbook_Open() Dim ws As Worksheet For Each ws In Worksheets Worksheets("Summary").Hyperlinks.Add Anchor:=Worksheets("Summary").Cells(ws.Index, 1), Address:="", SubAddress:=ws.Name & "!A1", TextToDisplay:=ws.Name Next End Sub