Tabbing from Cell to ComboBox

The wine definitely away ?

As I've seen inside your sheet it's needed to hold the default excel's TAB behaviour. So solution via OnKey method is forbidden now.

So something else. Here we check outgoing cells, in your case it's the celll above the combobox. Once the cell is left we focus the combobox.

Combobox has some key event too to focus next cell below.

module1::

Public last_adr As String

Public Sub set_control_focus(ByVal objname As String)
    Dim obj As OLEObject
    On Error GoTo err
    Set obj = Worksheets(1).OLEObjects(objname)
        obj.Activate
    Exit Sub
err:
End Sub

Workbook event::

Private Sub Workbook_Open()
    last_adr = ""
End Sub

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    If last_adr <> "" And last_adr = "$F$11" Then set_control_focus objname:="ComboBox1"
    last_adr = Target.Address
End Sub

ComboBox1 event::

Private Sub ComboBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 9 Then Worksheets(1).Range("F15").Select
End Sub

Have fun !

Hi Nicki,

of course i can try within your test sheet. But what about the test sheet protection ? Any key ? Or post the sheet once again but with unprotected VB.

Try it Nicki. shift+PageDown to view full list. I hope this help to you.

Have fun !