Checkbox et cochage

[belette]

Bonjour,

Dans mon userform j'ai trois checkbox, je voudrais qu'il n'y en ait qu'une checkbox coché à la fois
(le cochage d'une nouvelle checkbox est donc soit impossible soit décoche automatiquement l'autre)

Comment et où codé cela ?

Davance merci

 

[PascalXLD]

Bonjour

Tout d'abord le plus simple c'est de passer par des optionbutton qui te le font par définition.

Si tu veux vraiment passer par des checkbox tu vas être obligé de coder la modif des tes checkbox

 

[Pélican34]

Je ne sais pas comment coder cela avec des checkBox, en revanche si tu utilise des OptionsButtons à l'interieur d'une Frame, cela fonctionne très bien.

 

[Pélican34]

Je ne sais pas comment coder cela avec des checkBox, en revanche si tu utilise des OptionsButtons à l'interieur d'une Frame, cela fonctionne très bien.

 

[JC de Lorient]

salut
dans le code des checkbox il suffit de mettre des conditions a savoir que si checkbox1 est coché alors les deux autres sont décochés
si tu as besoin d'un code fais nous signe

 

[Robert]

Bonjour Belette, bonjour le forum,

Pourquoi n'utilises-tu pas des OptionButtons au lieu des CheckBoxes. C'est justement la différence entre les uns et les autres. Les OptionButtons ne permettent qu'un seul choix tandis que les CheckBoxes permettent d'affiner un choix en rajoutant des possibilités.

Édition :

Il est pas frais le Robert ! Il est pas frais !...

Message édité par: Robert, à: 06/06/2006 14:57

 

[belette]

Même avec des conditions (if 1 est coché alrs décoché 2 et décoché 3 etc.) ça ne marche pas (mais je soupçonne que ces intrucitons ne devrait pas être placer dans initialize)

Pour des optionsbuttons, il y a possibilités d'en cocher plusieurs par frame ?

Merci à tous pour vos prompts réponses.

 

[JC de Lorient]

re
code des checkbox :
Private Sub CheckBox1_Click()
If CheckBox1 = True Then
CheckBox2 = False
CheckBox3 = False
End If
End Sub

Private Sub CheckBox2_Click()
If CheckBox2 = True Then
CheckBox1 = False
CheckBox3 = False
End If
End Sub

Private Sub CheckBox3_Click()
If CheckBox3 = True Then
CheckBox1 = False
CheckBox2 = False
End If
End Sub

 

[PascalXLD]

RE

Pour les optionbutton tu ne peux en cocher qu'un par frame

C'est là l'avantage

 

[belette]

dans -click ! évidemment merci... (moi aussi fatigué !)

Pour les optionsbuttons tant pis.

 

[Hervé]

bonjour tout le monde

Quand on parle d'usine à gaz, je me sens concerné :

Private Sub CheckBox1_Click()
If CheckBox1 Then cocher 1
End Sub
'_____________________________
Private Sub CheckBox2_Click()
If CheckBox2 Then cocher 2
End Sub
'_____________________________
Private Sub CheckBox3_Click()
If CheckBox3 Then cocher 3
End Sub
'_____________________________
Public Sub cocher(n As Byte)
Dim i As Byte

For i = 1 To 3
        If Not i = n Then
                Controls('checkbox' & i) = False
        End If
Next i

End Sub

waouh, là je crois que j'ai fait fort
😱

salut

 

[PascalXLD]

RE

Je ne comprends pas ton :

Pour les optionsbuttons tant pis.

En effet dans ton premier post tu dis :

je voudrais qu'il n'y en ait qu'une checkbox coché à la fois

Et c'est ce que font les optionbutton

M'enfin

 

[belette]

En fait j'ai sept séries de trois 'cochés' (checkboxs/optionbuttons) dans une frame.

Je ne veux pas qu'il y a plusieurs 'chochés' dans une série, mais je ne dois pas empècher le cochage des autres séries (qui sont dans la même frame). Je pourrais faire plusieurs frames aussi mais bon...

Jolie ton usine Hervé ! 🙂

 

[PascalXLD]

RE

DAns ce cas là tu mets une valeur dans le groupname de tes optionsbutton qui vont ensemble

Et cela marchera

 

[Hervé]

re

merci belette, mais je suis capable de bien mieux en UAG.

pour ton souci, utilise des optionbuttons et regarde du coté de la propriété groupname.

salut