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
Partager