A Neat "Go To Sheet" Selector

[Rick Rothstein]

To call the form:

Sub CallGoToSheetSelector()
  GoToSheetSelectorUserForm.Show
End Sub

To center form and to focus in textbox so as to start typing immediately:

Private Sub UserForm_Activate()
    
With Me
  .StartUpPosition = 0
  .Left = Application.Left + (0.5 * Application.Width) - (0.5 * .Width)
  .Top = Application.Top + (0.5 * Application.Height) - (0.5 * .Height)
End With
   
Me.TextBox1.SetFocus
   
End Sub

Friendly greetings.

Who are you directing your comments to?