Use index sheets to quickly navigate in an Excel workbook

When working with large workbooks in Microsoft Excel, you can spend a good deal of time navigating through dozens of sheet name tabs to find the one you need. One method for making this task easier is to build an index sheet that contains hyperlinks to every worksheet in your workbook.

To create the index, follow these steps:

1. Insert a new worksheet at the beginning of your workbook and rename it Index.
2. Right-click on the sheet tab and select View Code.
3. Enter the following code

Private Sub Worksheet_Activate()
Dim wSheet As Worksheet
Dim M As Long
M = 1
    With Me
        .Columns(1).ClearContents
        .Cells(1, 1) = "INDEX"
        .Cells(1, 1).Name = "Index"
    End With
    
    For Each wSheet In Worksheets
        If wSheet.Name <> Me.Name Then
        M = M + 1
        With wSheet
            .Range("H1").Name = "Start" & wSheet.Index
            .Hyperlinks.Add Anchor:=.Range("H1"), Address:="", SubAddress:="Index", TextToDisplay:="Back to Index"
        End With
            Me.Hyperlinks.Add Anchor:=Me.Cells(M, 1), Address:="", SubAddress:="Start" & wSheet.Index, TextToDisplay:=wSheet.Name
        End If
        Next wSheet
End Sub

4. Press [Alt][Q] and save the workbook.

The next time you open the workbook, the Index sheet will contain a list of hyperlinks to each worksheet in the workbook. Each worksheet also contains a hyperlink back to the Index sheet. In this example, the link back to the Index is contained in cell H1, but it can be in any cell that is blank for all worksheets.

Πηγή: https://www.techrepublic.com/article/use-index-sheets-to-quickly-navigate-in-an-excel-workbook/#