Textbox dan diğer textbox a geçiş

[bravo64]

Arkadaşlar herkese iyi akşamlar
Userformumda 20 tane textbox var.Textbox18 den textbox8'e geçmek için nasıl bir kod yazmalıyım textbox18'e.Forumu inceledim,change,click hepsini denedim.Yani textbox18'e metin girdikten sonra enter tuşuyla textbox8 e geçmek istiyorum..
Teşekkürler..

 

[Levent Menteşoğlu]

Bunun için en basit yol, textboxların tab sıralamasını düzenlemektir. VBeditöründe userform seçili iken textboxların sıralamasını düzenleyebilirsiniz. Kod isterseniz aşağıdaki kodu deneyin. Ama ben birinci yolu tercih ederdim. İlk yolda tab ve enter tuşuda aynı işi görecektir.

[vb:1:65ac09933b]Private Sub TextBox18_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then TextBox8.SetFocus
End Sub
[/vb:1:65ac09933b]

 

[bravo64]

Sevgili Leventm,kod çalışıyor teşekkürederim..Peki sizin tercihiniz olan vbeeditörünü kullanamadım.userform seçiliyken properties penceresindemi düzenliyoruz,nasıl?
Zahmet olacak..

 

[Levent Menteşoğlu]

Ã?ncelikle alt+f11 ile VB editörünü açın sonrada oluşturduğunuz userformu fare ile seçin. Userform seçili iken view-tab order'i seçin.

Sonra çıkan pencerede move up ve move down tuşları ile textboxların tab sıralamasını değiştirebilirsiniz.

 

[bravo64]

Mükümmel,çok teşekkür ederim..Okadar çok şey öğrendimki sizden,bende birşeyler yapmak istiyorum..Nasıl faydalı olabilirim acaba?

 

[Levent Menteşoğlu]

Rica ederim faydalı olabildiysem ne mutlu bana. Bir şeyler yapmak istemenizdeki arzuyu takdir ediyorum. Siz soru sorarakta zaten bir katkıda bulunuyorsunuz. Fakat ileride yaptığınız çalışmaları forumumuza ekleyebilirsiniz. İyi bildiğinizi düşündüğünüz bir excel konusu hakkında dersanemizde yayınlanmak üzere bir makale de yazabilirsiniz.

 

[bravo64]

Tamam ,ilginize çok teşekkür ederim..