Command Button

[firstWeMeet]

Hi Everyone,
I place a command button in my sheet, which is in sheet1 for me to not take more time finding for specific sheet, because Its already a 60+ sheet in my workbook, so I decided to put a command button like a menu (summary of all sheets/Table of content), but my problem is, I don't have any idea about the code, can someone help me out of here?
Thanks

 

[VoG]

Try this: it will create an index sheet with hyperlinks.

Sub IDX()
Dim ws As Worksheet, i As Integer
Worksheets.Add(before:=Worksheets(1)).Name = "Index"
For Each ws In ThisWorkbook.Worksheets
    If ws.Name <> "Index" Then
        i = i + 1
        Sheets("Index").Range("A" & i).Value = ws.Name
        Sheets("Index").Hyperlinks.Add Anchor:=Range("A" & i), Address:="", SubAddress:="'" & ws.Name & "'!A1", TextToDisplay:=ws.Name
    End If
Next ws
Sheets("Index").Columns("A").AutoFit
End Sub

 

[agonysWeeper]

Hi Mr. Vog,
I am not familiar to much with the code, can you guide me? :D

 

[VoG]

Press ALT + F11 to open the Visual Basic Editor. Select Module from the Insert menu then paste the code into the white space on the right. Press ALT + Q to close the code window.

Press ALT + F8 and double click IDX.