Discussion :

[zouille]

salut a vous

toujours dans mon projet, j'aimerais votre aide
J'ai un userform dans lequel je demande: ( par CheckBox)
1- la TVA : 5.5 ou 19.6
2 - Impression oui ou non
3 - Voir devis a l'issu : oui ou non

J'ai realisé ca comme ca : ( uniquement action onclick)

Private Sub CheckBox2_Click() 'tva'
If CheckBox2.Value = True Then CheckBox1.Value = False
If CheckBox2.Value = False Then CheckBox1.Value = True
End Sub

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

Private Sub CheckBox3_Click()'impression'
If CheckBox3.Value = True Then CheckBox4.Value = False
If CheckBox3.Value = False Then CheckBox4.Value = True
End Sub

Private Sub CheckBox4_Click()'impression'
If CheckBox4.Value = True Then CheckBox3.Value = False
If CheckBox4.Value = False Then CheckBox3.Value = True
End Sub

Private Sub CheckBox5_Click() 'voir'
If CheckBox5.Value = True Then CheckBox6.Value = False
If CheckBox5.Value = False Then CheckBox6.Value = True
End Sub

Private Sub CheckBox6_Click() 'voir'
If CheckBox6.Value = True Then CheckBox5.Value = False
If CheckBox6.Value = False Then CheckBox5.Value = True
End Sub

N' y a t-il pas plus simple pour fair en sorte qu'un checkbox prenne la valeur opposé d'un autre ?

Est il plus judicieux de prendre des case a coché que des bouton option

Merci a vous

[khany]

Tu prends des OptionButton que tu places dans des frames afin que leur action de "groupe" soit dissociée et, en plus tu utilises des groupes de contrôles pour la clareté

[sovo]

slut je pense que la reponse de Khany resoud ton pb. Mais voila autre chose que je te propose (pour simplifier ton code)

au lieu de :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub CheckBox2_Click() 'tva'
If CheckBox2.Value = True Then CheckBox1.Value = False
If CheckBox2.Value = False Then CheckBox1.Value = True
End Sub

tu mets

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Sub CheckBox2_Click() 'tva'
CheckBox2.Value = not CheckBox2.Value 
End Sub

[Mehdi_ab]

bonjour

il faut que tu met des frames,dans chaque frame tu dessine des options button pour regrouper les choix de chaque opération ,ex : frame pour la séléction de la T.V.A ,qui vas contenir deux options buttons ,une qui a une caption 5.5 et l'autre 19.6 ,une autre frame pour l'impression ,qui vas contenir 2 OptionsButton qui ont pour valeur OUI/NON etc...
comme ça tu as le droit de séléctionnez une seul valeur soit : 5.5 ou 19.6 pour la TVA et oui/non pour l'impression, contrairement pour le checkbox ,tu peux selectionnez plusieurs valeurs à la fois ,mais tu as ecrit du code qui ne te permet pas cela, donc tu as juste ajouter du travail a toi,

J'espére être Clair

Merci

[leroissejp]

Bonsoir,
Les CheckBox et OptionButton n'ayant que deux valeur, True ou False, tu peux bien utiliser tes CheckBox. Celà t'évite de créer des Frames.
Un exemple de code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Private Sub CheckBox4_Click()'impression'
If CheckBox4.Value = True Then 
 CheckBox3.Value = False
Else
 CheckBox3.Value = True
End If
End Sub

jpleroisse

[zouille]

Salut et merci a tous pour vos idées
En fait je ne connaissait pas la difference entre les 2 et l'utilitée des frames : maintenant c'est ok

Je prend donc la solution bouton option + frame : ca marche super bien

Encore merci a vous