ActiveX Combobox.matchentry not working for last item in dropdown list

[MoshiM]

I have a combobox that is populated with al the worksheet names sorted in alphabetical order when the workbook is opened. When a user types in the name of a worksheet(partial match) then they are taken to that sheet. However this doesn't work for the last sheet in the list. Adding another sheet that would appear below this sheet alphabetically results in the user not being brought to the sheet but the previous sheet now works correctly.

Private Sub Sheet_Selection_Click()

    Application.Run "'" & ThisWorkbook.Name & "'!Go_To_Sheet", Me.Sheet_Selection.Value

End Sub

Private Sub Go_To_Sheet(Combo_Object_Value As String)
On Error Resume Next
Application.ScreenUpdating = False
ActiveWorkbook.Worksheets(Combo_Object_Value).Activate
Application.ScreenUpdating = True
End Sub

 

[sykes]

Can't see where your problem comes from - bit of an odd one, that...
However... wouldn't it be a lot simpler to just put the worksheet_activate call, directly into the ComboBox's _click event?

Private Sub ComboBox1_Change()
Sheets(Me.ComboBox1.Value).Activate
End Sub

...or, in your case:

Private Sub Sheet_Selection_Click_Change()
Sheets(Me.Sheet_Selection_Click.Value).Activate
End Sub

- cut out the middle man, so to speak...