Bonjour a tous,
sur une feuille excel, j'ai utilisé 5 togglebutton servant a régler l'affichage: en fonction des togglebutton enfoncés ou non certaines colonnes sont masquées ou non. Mais certaines colonnes doivent apparaitre quand le Togglebutton 1 est enfoncé mais aussi quand le 2ème est enfoncé. Si bien que si le 1er n'est pas enfoncé et que le 2eme l'est ces colonnes n'apparaissent pas alors qu'elles le devraient.
Voici en exemple le code de 2 des 5 togglebutton:
Private Sub ToggleButton2_Click()
If ToggleButton2.Value = True Then
Range('AE:AH,AS:AW').Select
Selection.EntireColumn.Hidden = False
Else: Range('AE:AH,AS:AW').Select
Selection.EntireColumn.Hidden = True
End If
End Sub
Private Sub ToggleButton3_Click()
If ToggleButton3.Value = True Then
Range('AE:AH,AX:BD').Select
Selection.EntireColumn.Hidden = False
Else: Range('AE:AH,AX:BD').Select
Selection.EntireColumn.Hidden = True
End If
End Sub
Serait-il possible de les faire fonctionner de manière completement indépendante?
D'avance merci,
a +
Toutou
sur une feuille excel, j'ai utilisé 5 togglebutton servant a régler l'affichage: en fonction des togglebutton enfoncés ou non certaines colonnes sont masquées ou non. Mais certaines colonnes doivent apparaitre quand le Togglebutton 1 est enfoncé mais aussi quand le 2ème est enfoncé. Si bien que si le 1er n'est pas enfoncé et que le 2eme l'est ces colonnes n'apparaissent pas alors qu'elles le devraient.
Voici en exemple le code de 2 des 5 togglebutton:
Private Sub ToggleButton2_Click()
If ToggleButton2.Value = True Then
Range('AE:AH,AS:AW').Select
Selection.EntireColumn.Hidden = False
Else: Range('AE:AH,AS:AW').Select
Selection.EntireColumn.Hidden = True
End If
End Sub
Private Sub ToggleButton3_Click()
If ToggleButton3.Value = True Then
Range('AE:AH,AX:BD').Select
Selection.EntireColumn.Hidden = False
Else: Range('AE:AH,AX:BD').Select
Selection.EntireColumn.Hidden = True
End If
End Sub
Serait-il possible de les faire fonctionner de manière completement indépendante?
D'avance merci,
a +
Toutou