Discussion :

[STEF68600]

Bonjour a tous,

je me pose une question : est-ce que je deviens débile ?

j'ai des checkbox sur une feuille et je souhaite changer le coche par vba suivant que je coche une checkbox ou une autre.
un peu comme le fait des radiobuttons.

voila mon code qui fonctionne pas :

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
Private Sub CheckBox1_Click()
CheckBox1.Value = True
CheckBox2.Value = False
CheckBox3.Value = False
 
End Sub
Private Sub CheckBox2_Click()
 
CheckBox1.Value = False
CheckBox2.Value = True
CheckBox3.Value = False
End Sub
Private Sub CheckBox3_Click()
 
CheckBox1.Value = False
CheckBox2.Value = False
CheckBox3.Value = True
End Sub

pourriez-vous m'aider ?
merci d'avance.

nota : je suis en excel 2003

[laetitia]

bonjour STEF68600 le forum essai comme cela

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
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
CheckBox2.Value = False
CheckBox3.Value = False
End If
End Sub
Private Sub CheckBox2_Click()
If CheckBox2.Value = True Then
CheckBox1.Value = False
CheckBox3.Value = False
End If
End Sub
Private Sub CheckBox3_Click()
If CheckBox3.Value = True Then
CheckBox1.Value = False
CheckBox2.Value = False
End If
End Sub

par contre si tu en as beaucoup il faut passer par un module de classe

[STEF68600]

Je ne dirais qu'un mot : Merci

Les femmes ont toujours raison !

Bonne journée