Bonjour,

Je rencontre actuellement un problème sur l'élaboration d'un nouveau classeur comportant des macros.
Je voudrais faire un système de check-box qui identifie une valeur de donnée dans la première colonne est qui après affiche ou non la valeur suivant que la case oui est coché ou la case non. J'ai codé de cette façon ci dessous, le problème est que les lignes du tableaux veulent parfois se cacher mais ne jamais s'afficher, je débute en VBA.

Merci à tous d'avance pour vos conseils.

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
22
23
24
25
26
27
28
29
30
31
32
Private Sub CheckBox5_Click() 
'CheckBox Oui Surmoulage
'Label1 = Surmoulage
Application.DisplayAlerts = False
If CheckBox5.Value = True Then
CheckBox6.Value = False
End If
'recherche et suppression de la ligne valeur ""
i = 1
While Sheets("Liste process Impactés").Cells(i, 1) = "Surmoulage"
            Sheets("Liste process Impactés").Rows(i & ":" & i).Hidden = False
        i = i + 1
 
 
Wend
End Sub
 
Private Sub CheckBox6_Click()
'non Surmoulage
Application.DisplayAlerts = False
If CheckBox6.Value = True Then
CheckBox5.Value = False
 
End If
i = 1
While Sheets("Liste process Impactés").Cells(i, 1) = "Surmoulage"
            Sheets("Liste process Impactés").Rows(i & ":" & i).Hidden = True
        i = i + 1
 
Wend
 
End Sub