alt sekme göster/gizle

[onur3466]

merhaba yukarıdaki checkbox a tıkladığımda
alt sekmede yer alan 9 nokta set 1 sekmesinin gelmesini tıklıı olmadığı durumda ise gözükmemesini istemekteyim. Aynı şekilde yukarıdaki checkboxlar set 2 set 3 set4 olarak da yapmak istiyorum.konu ile ilgili yardımlarınız rica ederm.

 

[onur3466]

merhaba yukarıdaki checkbox a tıkladığımda
alt sekmede yer alan 9 nokta set 1 sekmesinin gelmesini tıklıı olmadığı durumda ise gözükmemesini istemekteyim. Aynı şekilde yukarıdaki checkboxlar set 2 set 3 set4 olarak da yapmak istiyorum.konu ile ilgili yardımlarınız rica ederm.

 

[YUSUF44]

Aşağıdaki kodu kullanıp, diğer seçenekler için de ayrı ayrı kopyalayarak uyarlayabilirsiniz:

Private Sub CheckBox1_Change()
If CheckBox1 = True Then
    Sheets("9 Nokta Set 1").Visible = True
    Sheets("9 Nokta Set 1").Activate
Else
    Sheets("9 Nokta Set 1").Visible = False
End If
End Sub

 

[onur3466]

çok teşekkür ederim :9 fakat çoklu nasıl yapabilirim makro bilgim fazla yokta end if den sonra kopyalamı yapıcam

 

[YUSUF44]

Bu kod bir sekme ve bir düğme için. Zaten bildiğim kadarıyla bir düğmeyle sadece bir sekme için belirttiğiniz işlemi yapabilirsiniz. Belki işaretliyse A sekmesini göster B sekmesini gizle, işaretli değilse A sekmesini gizle B sekmesini göster diye değişiklik yapılabilir ama istediğiniz şekilde daha fazla sekme için yapılması bu haliyle mümkün değil. O nedenle her sekme için ayrı düğme ekleyip o düğme için kodları uyarlamanız gerekiyor.

 

[onur3466]

onuda yapamadım ayrı ayrı ayrdımcı olursanız sevinirim

 

[1Al2Ver]

Merhaba,

Sayın YUSUF44'ün kodundan yola çıkarak örnek bir dosya oluşturdum,

4 adet CheckBox'ı grupladım,

İstediğiniz bu değil ise, başka çözümler beklemelisiniz,

Kolay gelsin.

 

[YUSUF44]

Checkboxla değil de daha kullanışlı olduğunu düşündüğüm hücreye tıklamayla çalışan bir dosya hazırladım. İnceleyiniz:

 

[Greenblacksea53]

Doğru mu anladım inceler misin ?

 

[onur3466]

aynen hocm çok teşekkür ederim

 

[onur3466]

bu baya kullanışlı olmuş hocam elinize sağlık çok teşekkür ederim