Userform TextBox Exit

tamer42

Destek Ekibi
Destek Ekibi
Katılım
11 Mart 2005
Mesajlar
3,049
Excel Vers. ve Dili
Office 2013 İngilizce
Merhaba,
TextBox içinde metin belli bir uzunluğa erişince;
otomatik olarak textbox içinden çıkma işlemini kod ile nasıl sağlayabiliriz?

TextBox1.SetFocus
olayının tersini aramaktayım.
Özetle: bu olay gerçekleşsin...
Kod:
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)

End Sub
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,057
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Aşağıdaki gibi deneyin. Yani metin uzunluğu istediğiniz değere ulaşınca başka bir nesneye setfocus ile yönlendirin.

Kod:
Private Sub TextBox1_Change()
If Len(TextBox1) > 3 Then TextBox2.SetFocus
End Sub
 
Son düzenleme:

tamer42

Destek Ekibi
Destek Ekibi
Katılım
11 Mart 2005
Mesajlar
3,049
Excel Vers. ve Dili
Office 2013 İngilizce
Aşağıdaki gibi deneyin. Yani metin uzunluğu istediğiniz değere ulaşınca başka bir nesneye setfocus ile yönlendirin.

Kod:
Private Sub TextBox1_Change()
If Len(TextBox1) > 3 Then TextBox2.SetFocus
End Sub
Levent Hocam teşekkürler,
bu yöntemi denemiştim, daha pratik bir yöntem olabilir mi diye sorumuştum.
 
Üst