Cases à cocher

[Jeandorpas]

Bonjour à toutes et tous !

J'ai recherché dasn les posts si le sujet existait déjà, je ne l'ai pas trouvé.
Si cette demande fait doublon, veuillez m'en pardonner et m'indiquer où la réponse se situe, merci !

Alors, voilà mon problème.

ou Ce lien n'existe plus si l'image est trop importante ou illisible.

Je propose des questions et la personne coche des cases.
Le soucis que je rencontre :
- comment faire pour ne cocher qu'une seule case
- la 'coche' suivante sur la même ligne de cases annule la 'coche' précédente

J'espère que cette question est assez claire.

J'utilise Excel 2003 SP2 avec Wiondows XP pro 2002 SP2 et dispose de Visual Basic (mais n'y connais rien).

Je vous remercie de votre aide, cordialement,
Jean

 

[Eric C]

Bonjour le forum
Bonjour jeandorpas (n'abuses pas trop des sommifères ... arf)

Un début de piste à reprendre pour les autres CheckBox :

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
CheckBox2.Value = False
CheckBox3.Value = False
End If
End Sub

Ce qui fait que si CheckBox2 ou 3 ou les 2 sont sélectionnés, l'action sur le CheckBox1 le ou les désélectionne.

Bonne journée à toutes & à tous

 

[Eric C]

Re le forum
Re bonjour jeandorpas

Le code complet pour 3 CheckBoxs

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

Baille bye

 

[daniel]

Bonjour à tous,
Je viens de recopier le code et l'ai collé pour chaque boite et là Visual me répond :
'erreur de compilation, sub ou fonction non définie'.
Pourriez-vous m'éclairer, ça m'arrive souvent d'avoir ce message et j'aimerais m'en débarrasser.
Merci par avance pour vos réponses.

 

[jeandorpas]

Merci pour ces précieuses réponses.

Cependant, vous allez trouver que j'abuse, mais où dois-je positionner ces lignes de codes ?

J'ai essayé de mettre ces lignes de codes dans les 'macros' des cases, en changeant 1 par 74, soit le n° de la case, mais je n'obtiens rien qu'un message d'erreur.

Merci encore de votre aide (je vous avais bien dis que je suis une buse en Excel)

 

[ccpapy]

bonjour à tous,
jeandorspas, tu as bien copié

Private Sub CheckBox1_Click()
If CheckBox1 = True Then
CheckBox2 = False
CheckBox3 = False
End If
End Sub
dans le checkbox1

Private Sub CheckBox2_Click()
If CheckBox2 = True Then
CheckBox1 = False
CheckBox3 = False
End If
End Sub
dans le checkbox2
et ainsi de suite pour le 3 ?

 

[visiteur]

bonjour à tous

jeandorpas, tu fais Alt+F11, insère un module et colle ta macro
puis crée un bouton sur ta feuille de travail et clic droit affecter une macro

 

[daniel]

Re,
Mon erreur venait du fait en copiant/collant, c'était mal interprété, les if ou then n'étaient pas considérés comme du code et donc n'étaient pas en bleu.
Peut-être est-ce le même soucis pour toi jeandorspas ???
Salut.

 

[jeandorpas]

désolé, je ne comprends rien, ni où coller cela, ni comment faire, je suis sur ma feuille excel avec mes cases et je suis paumé.

 

[jeandorpas]

visiteur écrit:

bonjour à tous

jeandorpas, tu fais Alt+F11, insère un module et colle ta macro
puis crée un bouton sur ta feuille de travail et clic droit affecter une macro

Quand je fais F11, j'obtiens un affichage gris sur visual basic, mais rien où copier les codes.
Suis un boulet, non ?

 

[daniel]

Re,
Encore moi, entre buses hein !!!
Pour créer tes cases à cocher, utilises-tu bien la barre d'outil Boite à outils controles et non formulaires ??
Si c'est bien controles et si le bouton mode création est enfoncé (bouton avec une règle une équerre bleue et un crayon), cliques 2 fois dessus et la fenêtre visual s'ouvre automatiquement

Private Sub CheckBox4_Click()

End Sub
Tu y colles le code fourni, mais surtout fais bien attention que les mots codes soient bien en bleu ci-desssous :

Private Sub
If True Then
False
False
End If
End Sub
J'espère que ça va t'aider, j'suis à fond là, je pourrai pas t'offrir bcp plus.

 

[Eric C]

Re le forum
Bonjour Daniel, visiteur & ccpapy

Un tit fichier valant mieux qu'un long discours

Bonne journée à toutes & à tous [file name=Jeandorpas.zip size=10441]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Jeandorpas.zip[/file]

 

[Eric C]

Re le forum
Bonjour Daniel, visiteur & ccpapy

Un tit fichier valant mieux qu'un long discours

Bonne journée à toutes & à tous [file name=Jeandorpas_20051221112757.zip size=10441]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Jeandorpas_20051221112757.zip[/file]

 

[jeandorpas]

Eric C écrit:

Re le forum
Bonjour Daniel, visiteur & ccpapy

Un tit fichier valant mieux qu'un long discours

Bonne journée à toutes & à tous [file name=Jeandorpas.zip size=10441]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Jeandorpas.zip[/file]

Fichier bien reçu mais je n'y arrive pas.
Si tu es d'accord, 0632121427, à réception de ton appel, je te rappelerai pour t'éviter les frais.
Seulement si tu es dispo et ok.
Merci

 

[Eric C]

Re le forum
Re le fil

Non non non, tout se passe Ici sur ce forum qui est un forum d'Aide bénévole & de Partage de Connaissances.

A cette heure 11:50, il y a déjà eu 81 visites donc de nombreuses personnes sont intéressées par ton post. Il ne serait pas judicieux de n'en faire profiter que toi.

Le mieux est de placer un fichier avec ce que tu désires exactement.

Tu auras une réponse très rapidement. Si cela n'était pas, je reviendrai ce soir vers 18H15 pour voir ... Là je vais me restaurer et partir au boulot.

Bonne appétit à toutes & à tous