Textbox tan Combobox geçiş

[polis-53]

Merhaba arkadaşlar excel sayfa üzerinde biir adet textbox bir adet combobox var ben textbox a değer girip Enter tuşuna bastığımda combobox geçmeli tekrar entet tuşuna bastımımda textbox a dönmeli yani mause kullanmadan bu işlemi yapmak istiyorum.

 

[EmrExcel16]

Merhaba , sayfanın kod bölümüne.

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 13 Then
        ComboBox1.Activate
    End If
End Sub
Private Sub ComboBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 13 Then
        TextBox1.Activate
    End If
End Sub

 

[polis-53]

ComboBox1.Activate
bu satırda hata veriyor

 

[EmrExcel16]

ComboBox1.Activate
bu satırda hata veriyor

Örnek dosya ekleyebilir misiniz ?

 

[polis-53]

dosya ekte

 

[Korhan Ayhan]

Hatanın sebebi nesneyi yanlış tarif etmişsiniz. Sizin sayfanızda COMBOBOX yok.

CommandButton var.

 

[polis-53]

CommandButton1 dan textbox a geçişte textbox içini boşaltsın

 

[Seyit Tiken]

Aşağıdaki gibi yapılırsa koda gerek kalmaz.