Discussion :

[Yamiral]

Bonjour,

Je me permet d'effectuer ce post, car aucune de mes recherches n'a répondu à ma question.

Je travaille sur un fichier Excel sur lequel 4 Checkbox sont présente.
en fonction des checkbox qui sont sélectionnées, une partie de la page est masquée.

Par exemple :
Si checkbox 1 est cochée, alors masquer les lignes 10 à 20.
Néanmoins, si checkbox1 et 2 sont cochées alors masquer uniquement les lignes 10 à 15

J'ai maladroitement essayer sa,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
If CheckBox1 = True Then
Rows("10:20").EntireRow.Hidden = True
 
ElseIf If CheckBox1 And CheckBox2 = True Then
Rows("10:15").EntireRow.Hidden = True

Le problème, c'est que les lignes 15 à 20 restent cachés quand les deux cases sont cochées, de plus si rien n'est coché, il faudrait que tout s'affiche.

Je ne sais ni comment développer cette macro pour atteindre mon but, ni ou la marquer pour qu'elle soit active sur toutes les checkbox.

Si vous pouvez m'aiguiller ou bien m'apporter des solutions,

Je vous en remercie d'avance

Cordialement.

[HopPopPop]

Bonjour à tous.

A essayer.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Sub Test()
    Rows("10:20").EntireRow.Hidden = False
 
    If CheckBox1 And CheckBox2 Then
        Rows("10:15").EntireRow.Hidden = True
    ElseIf CheckBox1 Then
        Rows("10:20").EntireRow.Hidden = True
    End If
End Sub
Private Sub CheckBox1_Change()
    Call Test
End Sub
Private Sub CheckBox2_Change()
    Call Test
End Sub
Private Sub CheckBox3_Change()
    Call Test
End Sub
Private Sub CheckBox4_Change()
    Call Test
End Sub

Tout cela situé dans le module de la feuille concernée.
cordialement.