TextBoxların Temizlenmesi

[yavuz829]

Merhaba arkadaşlar.

UserForm her yenilendiğinden aşağıdaki TextBoxlar ve ComboBoxlar temizlensin.

Me.ComboBox3 = ""
Me.TextBox2 = ""
Me.TextBox3 = ""
Me.TextBox4 = ""
Me.TextBox30 = ""

Me.TextBox5 = ""
Me.TextBox6 = ""
Me.TextBox7 = ""
Me.TextBox66 = ""
Me.TextBox67 = ""
Me.TextBox8 = ""
Me.TextBox9 = ""
Me.TextBox28 = ""
Me.TextBox78 = ""
Me.TextBox79 = ""

 

[Seyit Tiken]

Bu şekilde deneyiniz.

For Each txt In Me.Controls
If TypeName(txt) = "TextBox" Or TypeName(txt) = "ComboBox" Then txt.Value = ""
Next

 

[yavuz829]

Çok teşekkürler Hocam ellerinize sağlık.

Formu kapatmadan formlar arası geçiş yaptığımız zaman da TextBoxları temiliyebilirmiyiz.

Örneğin: UserForm1 de Butonla Userform2 yi açıyorum UserForm2 ListBoxda seçtiğim sayfaya geçiş yapıyorum. UserForm1 kapanmadan.
Yani sayfalar arası geçiş yaptığım zaman TextBoxlar temizlensin.