Prompt user to select worksheet

If you dont want all sheets to be visible after the user selects the sheet they need (and just unhide the sheet they are after) change the code to the following:

Private Sub CommandButton1_Click()

Dim sh As Worksheet
Dim strWS As String


strWS = Me.ComboBox1 & " " & Me.ComboBox2

ThisWorkbook.Worksheets(strWS).Visible = True
ThisWorkbook.Worksheets(strWS).Select

End Sub

OOPS duplicate post for some reason...mods please delete this one.