Uyan şartlara göre userform3'teki commandbutton gizlensin.

[Orion1]

Mrb.

Private Sub CommandButton2_Click()
Unload Me
UserForm3.Show
End Sub

Private Sub CommandButton3_Click()
Unload Me
UserForm3.Show
End Sub

Yukarıdaki kodlar UserForm6'da bulunmakadır.
Yukarıdaki kodlar ile Userform3 aktiff ediyorum.
CommandButton3'ü tıkladığımda, Userform3'te bulunan CommandButton1 gizlensin,
CommandButton2'yi tıkladığımda UserForm3'teki CommandButton1 Gözüksün istiyorum.
Teşekkür ederim.
Kolay gelsin.

 

[xxrt]

Kodlar UserForm6'da Bulunuyor
Butonlara basttığınızda UserForm6 Kapanıyor UserForm3 Açılıyor.
Þimdi;

CommandButton3'ü tıkladığımda, Userform3'te bulunan

Bu CommandButton3 butonu UserForm6'daki mi?Yoksa UserForm3'de ayrı bir CommandButton3'mi Var.

Eğer UserForm3'de ayrı bir CommandButton3 var ise;

UserForm''ün Initialize olayına

[vb:1:89df53ccd2]Private Sub UserForm_Initialize()
CommandButton1.Visible = False
End Sub[/vb:1:89df53ccd2]

Yazmanız gerek ..AKsi halde UserForm6 Unload Me ile kapanacağından dediğiniz (UserForm6 Üzerindeyse CommandButton3) yapamazsınız.(*)

Prensip olarak
.Visible =True ve False ile gizlemeleri yapabilirsiniz.
Gizlemeyipte Aktif veya Aktif olmamasını isterseniz
.Enabled =True veya False yazmanız gerek.
Kolay Gelsin.


(*)Heriki UserForm ShowModal Ã?zelliğini False yapmanız halide İki UserFormda çalışabilirsiniz.