User formda enter tuşu kullanımı

[bambilic]

Arkadaşlar merhaba.
excel sayfasında makro atanmıs bir dügme var bu düğmeye basınca bir userform acılıyo ve ne yapmak istediğimi soruyor. Userformda ok tuşları ile aşağı yukarı giderek yapmak istediğim işlemi seciyorum ama enter tusuna basınca işlemi yapmıyor yanlızca çift tıklama ile bu işlemi yapabiliyorum. Sizden ricam nasıl bir kod eklemem gerek entere basınca secili işlemi yapsın?

 

[Orion1]

İlgili nesnenin keycode olayına

if keycode = 13 then 
    'Buraya Kodlarınızı yazın"
end if

 

[bambilic]

Teşekkürler Evren Hocam ama becermedim

 

[bambilic]

Hocam yanlış anlatmışım açılan userform değil Listbox. acaba bu yğzden mi beceremedim?

 

[bambilic]

Private Sub ListBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii = 13 Then
Sheets(ListBox1.List(ListBox1.ListIndex)).Select
End If
End Sub


Listbox diye artınca forumda buldum teşekkürlerrrrr