checkbox = true ou false ?

  • Initiateur de la discussion Initiateur de la discussion Nevil
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Nevil

XLDnaute Occasionnel
Me revoilou, bonjour a ceux que je n'ai pas vu.

Alors ma question est la suivante:

J'ai 3 checkbox:
Lorsque j'active la 1ere, ca desactive la 3e
Lorsque j'active la 2e, ca desactive la 3e
Lorsque j'active la 3e, ca desactive la 1ere et 2e.

Maintenant je souhaiterais que lorsque j'active la 1ere et la 2eme, la 3eme soit activée et que la 1ere et la 2e se desactive.

Peut etre un peu difficile a comprendre, c'est pour ca que je vous joint le fichier:
[file name=classeur_20060224100856.zip size=9893]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/classeur_20060224100856.zip[/file]

merci
 

Pièces jointes

En fait, en luttant un peu je viens de trouver la solution. Je vous join mon code a titre indicatif,ca peux toujours servir a quelqu'un et je pense qu'il est a amélioré:

Code:
Private Sub CheckBox1_Click()
If CheckBox1.Value = True And CheckBox2.Value = True Then
CheckBox1.Value = False
CheckBox2.Value = False
CheckBox1.Enabled = False
CheckBox2.Enabled = False
CheckBox3.Enabled = True
CheckBox3.Value = True
ElseIf CheckBox1.Value = True And CheckBox2.Value = False Then
CheckBox3.Enabled = flase
CheckBox3.Value = False
ElseIf CheckBox1.Value = False Then
CheckBox3.Enabled = True
End If
End Sub

Private Sub CheckBox2_Click()
If CheckBox2.Value = True And CheckBox1.Value = True Then
CheckBox1.Value = False
CheckBox2.Value = False
CheckBox1.Enabled = False
CheckBox2.Enabled = False
CheckBox3.Enabled = True
CheckBox3.Value = True
ElseIf CheckBox2.Value = True And CheckBox1.Value = False Then
CheckBox3.Enabled = False
CheckBox3.Value = False
ElseIf CheckBox2.Value = False Then
CheckBox3.Enabled = True
End If
End Sub
Private Sub CheckBox3_Click()
If CheckBox3.Value = True Then
CheckBox1.Enabled = False
CheckBox2.Enabled = False
Else
CheckBox1.Enabled = True
CheckBox2.Enabled = True
End If
End Sub

Pour les tester récupérez mon fichier join et remplacer l'ancienne source.

Merci
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

B
  • Question Question
Réponses
6
Affichages
2 K
B
Réponses
7
Affichages
1 K
yves_passe
Y
I
Réponses
5
Affichages
3 K
imanuelga
I
B
  • Question Question
Réponses
3
Affichages
1 K
barbara
B
Réponses
4
Affichages
1 K
D
Réponses
2
Affichages
2 K
drums
D
J
Réponses
10
Affichages
1 K
J
N
Réponses
10
Affichages
1 K
N
Réponses
2
Affichages
1 K
M
Réponses
4
Affichages
1 K
J
  • Question Question
Réponses
2
Affichages
982
L
  • Question Question
Réponses
1
Affichages
1 K
L
J
Réponses
3
Affichages
1 K
J
J
  • Question Question
Réponses
4
Affichages
1 K
J
Retour