Userfomda kod tanımlama

[marlalı1]

Arkadaşlar userform üzerinde oluşturduğumuz controls düğmelerine (label,texbox,listbox) nasıl kod yazacaz.üzerinde sağ klıck yapıp wiew kod deyince açılan yere mi yapıştırcaz formülleri.

 

[marlalı1]

userformda ki açılan control tuşlarına nasıl kod yazarız

arkadaşlar userform üzerimde oluşturduğum control tuşlarına kod ları nasıl yazacam.üzerine çift tıklayınca beyaz bir sayfa açılıyor.buraya kodları kopyalayabilirmiyim.tuşlar çalışırımı

 

[Necdet]

Merhaba,

Userform üzerinde herhangi bir nesneye (Örneğin Textbox1) çift tıkladığınızda ya da sağ tıklayıp View Code u seçerseniz o nesne ile VBA nın kabul ettiği Sub açılır.

Aşağıdaki kod TextBox1 e çift tıklandığında oluşan kod yapısıdır.
Kodların olduğu bu beyaz sayfanın üzerinde 2 adet açılır liste var. Soldakinin içinde Koyu Textbox1, ve sağdakinde ise yine koyu Change vardır.
Siz Change ı değiştirerek amacınıza uygun olayı seçerseniz onunla ilgili boş yapı gelir.

Private Sub TextBox1_Change()
Kodlar
Kodlar
Kodlar
.
.
.
Kodlar
End Sub

 

[security]

userformun üstüne eklediğiniz command button- label-textbox vs lere kod eklemek için üzerine çift tıklayın. veya sağ tuş wiew kod diyebilirsiniz.
örnek:

Private Sub CommandButton1_Click()
buraya kodlarınızı yazın
End Sub

kolay gelsin.