Code vb CheckBox1_Click()".

Résolu/Fermé
aurel51 Messages postés 68 Date d'inscription jeudi 16 août 2007 Statut Membre Dernière intervention 8 février 2009 - 21 août 2007 à 12:04
aurel51 Messages postés 68 Date d'inscription jeudi 16 août 2007 Statut Membre Dernière intervention 8 février 2009 - 23 août 2007 à 17:01
Bonjour,

j'ai fais un formulaire avec vb pour remplir un tableau excel. Dans mon formulaire, il y a une case à cocher "CheckBox1_Click()".
Le problème est que lorsque je coche ou décoche cette case, cela m'affiche "vrai" ou "faux" dans mon tableau excel. j'aimerai que cela m'affiche "oui" ou "non".

merci de votre aide
aurel51
A voir également:

8 réponses

coco49rico Messages postés 92 Date d'inscription mardi 14 août 2007 Statut Membre Dernière intervention 30 novembre 2011 76
22 août 2007 à 15:59
Bonjour,

La Checkbox est liée à une cellule qui affiche VRAI/FAUX par défaut. Je n'ai pas trouvé de moyen pour modifier ces valeurs VRAI/FAUX par OUI/NON.
Peux-tu masquer cette colonne et faire un test dans ton tableau ?
=SI(H10=VRAI;"OUI";"NON")

Rico
0
Salut Rico,

j'ai bien pensé faire ce que tu écrit mais ca ne va pas. j'ai pri une cellule vide pour ma checkbox en cachant la cellule. après je fais une fct si dans ma cellule ou je veux oui/non mais ca me decalle d'une ligne vue que je rempli mon tableau par le dessus.

je c pas trop coment faire, le mieu serai de trouvé un code vba qui gér cette conversion
0
coco49rico Messages postés 92 Date d'inscription mardi 14 août 2007 Statut Membre Dernière intervention 30 novembre 2011 76
22 août 2007 à 22:13
Aurel51,

Et si tu places la cellule liée à la case à cocher complètement à droite de ton tableau, que tu lies ton tableau à cette celulle et que tu masques la colonne complètement à droite ?
Tu es habituée à utiliser Excel ? C'est pas un reproche, juste une question pour pouvoir t'aider

Rico

coco49rico@orange.fr si tu veux que je te reformate ton tableau
0
aurel51 Messages postés 68 Date d'inscription jeudi 16 août 2007 Statut Membre Dernière intervention 8 février 2009 6
23 août 2007 à 11:31
slt,

je suis pas un expert excel mais je me débrouille. j'ai fais comme tu m'a dit. j'ai prit une cellule vierge à l'écart de mon tableau que j'ai masqué et qui est lié a ma "Checkbox". ensuite j'ai mis une condition si ton la cellule de mon tableau ou je veux recupéré Oui/Non.

G11=SI(H1=VRAI;"Oui";"Non")

le problème est que j'insert les lignes par le haut du tableau donc ca decale ma formule avec la cellule G11 donc G12. j'arrive pas a figer la formule en G11.

tu m'a donné ton adresse mail pour que je t'envoi le tableau et que tu essai deçu?
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
coco49rico Messages postés 92 Date d'inscription mardi 14 août 2007 Statut Membre Dernière intervention 30 novembre 2011 76
23 août 2007 à 15:17
Bonjour,

Envoie ton tableau, je verrai ce que je peux faire

Rico
0
ca y est rico, je t'ai envoyé ca par mail.

merci
0
coco49rico Messages postés 92 Date d'inscription mardi 14 août 2007 Statut Membre Dernière intervention 30 novembre 2011 76
23 août 2007 à 16:33
Re Salut,

La solution a ton problème :

1/ Modifie la case à cocher en enlevant le champ "control source" (clic droit sur Checkbox1 et enlève la référence à tableau!G11)

2/ Rajoute le petit bout de code (clic droit sur Checkbox1) :
Private Sub CheckBox1_Click()

If CheckBox1 = 0 Then
TextBox7 = "0"
Sheets("tableau").Range("G11").FormulaR1C1 = "NON"
Else: TextBox7 = ""
Sheets("tableau").Range("G11").FormulaR1C1 = "OUI"
End If

End Sub

Et voilà !
Par rapport à ta nouvelle question dans le mail : Qu'est ce que tu veux faire comme graphique ?

Rico
0
aurel51 Messages postés 68 Date d'inscription jeudi 16 août 2007 Statut Membre Dernière intervention 8 février 2009 6
23 août 2007 à 17:01
Déjà ca marche. merci Rico.
j'avai pas pensé faire comme ca, bien joué.

je veux faire des graphiques avec le nb d'accidents par an (avec et sans arrêt), les secteurs des accidents en %, le type de blessure...

je pensai faire des histogrammes
0