Freeze Sheet Tab

[Mikey B]

I have my first sheet with a tab called INDEX. It has hyperlinks to jump to
the other sheets on this workbook.
I would like to be able to keep the INDEX tab always on the right and not
scroll off when jumping to different sheets.
This would be similar to freezing panes but rather just freeze one tab.

Sorry if this seems trivial. Any help would be appreciated.

 

[excelent]

one way :

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
ActiveWindow.ScrollWorkbookTabs Sheets:=-Sheets.Count
End Sub

another:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If ActiveSheet.Name <> "INDEX" Then
Application.ScreenUpdating = False
x = ActiveSheet.Name
Sheets("INDEX").Move Before:=ActiveSheet
Application.EnableEvents = False
Sheets(x).Select
Application.EnableEvents = True
Application.ScreenUpdating = True
End If
End Sub


"Mikey B" skrev:

 

[excelent]

Forgot put code in ThisWorkbook-module

"Mikey B" skrev:

 

[Mikey B]

Thank you excelent for you response. Both work for what I need just in
different ways.