Togglebutton'u Gizleme-Gösterme

[gurgef]

Değerli arkdaşlar,

Ekteki dosyada, 2 toggle button var, Birinciye bastığımızda yeşil işaretli sütunları gizliyor-gösteriyor (J-P arası). İkinci togglebutton ise bu yeşil hücrelerin içinde, ancak yeşil sütunlar gizlense bile ikinci togglebutton yine gözüküyor. Sütunlarla birlikte bunların içerisinde yer alan ikinci togglebutton da gizlenip gösterilebilir mi?

ilgiliniz için teşekkürler. (Örnek dosya ektedir.).

 

[İhsan Tank]

Değerli arkdaşlar,

Ekteki dosyada, 2 toggle button var, Birinciye bastığımızda yeşil işaretli sütunları gizliyor-gösteriyor (J-P arası). İkinci togglebutton ise bu yeşil hücrelerin içinde, ancak yeşil sütunlar gizlense bile ikinci togglebutton yine gözüküyor. Sütunlarla birlikte bunların içerisinde yer alan ikinci togglebutton da gizlenip gösterilebilir mi?

ilgiliniz için teşekkürler. (Örnek dosya ektedir.).

Merhaba
ToggleButton1'in kodlarını bununla değiştirin.

Private Sub ToggleButton1_Click()
If ToggleButton1 = True Then
ToggleButton1.Caption = "Göster"
Range("J:P").EntireColumn.Hidden = True
ToggleButton2.Visible = False
Else
ToggleButton1.Caption = "Gizle"
Range("J:P").EntireColumn.Hidden = False
ToggleButton2.Visible = True
End If
End Sub

 

[gurgef]

Aradığım şey buydu. Cevabınız ve yardımınız için çok teşekkür ederim İhsan Bey.

 

[İhsan Tank]

Aradığım şey buydu. Cevabınız ve yardımınız için çok teşekkür ederim İhsan Bey.

Rica ederim
:keyif: