|While the links that Paul1149 suggested are certainly more elegant than this solution, sometimes simplicity isn't a bad way to go.|
If you know the name of the sheet you are looking for, this code will activate it.
Create a toolbar icon to access the macro so it is available regardless of which sheet you are viewing.
Click the button and enter the name of the sheet you want to activate:
Dim mySht As String
On Error GoTo noSht
'Get sheet name from user
mySht = Application.InputBox("Please Enter Sheet Name")
'Exit if Canceled
If mySht = "False" Then Exit Sub
'Activate Sheet and Exit
'Present message if sheet not found
MsgBox "Sorry, there is no sheet by that " & _
"name in the workbook." & vbCrLf & vbCrLf & _
"Please try again."
Click Here Before Posting Data or VBA Code ---> How To Post Data or Code.