Pb de checkbox aec excel vb

Fermé
butters9547 Messages postés 208 Date d'inscription mardi 9 juin 2009 Statut Membre Dernière intervention 27 août 2013 - 15 juin 2009 à 17:43
butters9547 Messages postés 208 Date d'inscription mardi 9 juin 2009 Statut Membre Dernière intervention 27 août 2013 - 16 juin 2009 à 09:14
Bonjour,
je voudrais savoir si il serait possible que lorsque je coche mes checkbox, s'affiche "oui" ou "non" nan le tableau excel au lieu de "vrai" ou "faux".
un 2eme petit soucis, c'est lorsque je coche mes fameuses chackbox ^^, il s'affiche effectivement vrai ou faux mais si je les coches pas du tout elles affichent "faux". alors je voudrais savoir si il est possible qu'elles affichent quelque chose seulement si elles sont coché.
j'espère avoir été un peu clair et merci de votre aide
voici mon code au cas ou :

https://www.cjoint.com/?gpq4JEg4ls

merci ^^
A voir également:

6 réponses

Mike-31 Messages postés 18337 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 27 septembre 2024 5 100
15 juin 2009 à 21:47
Salut,

Tu éffaces le controlSource de ta Checkbox et tu saisis ce code pour la checkbox1 qui affichera en Cellule B15 Oui lorsqu'elle est cochée et Non lorsqu'elle est décochée

Private Sub CheckBox1_Click()
If CheckBox1 = True Then [B15] = "Oui"
If CheckBox1 = False Then [B15] = "Non"
End Sub


Le code ci-dessous n'affiche rien lorsqu'elle est décochée

Private Sub CheckBox1_Click()
If CheckBox1 = True Then [B15] = "Oui"
If CheckBox1 = False Then [B15] = ""
End Sub

A+
Mike-31

Un problème sans solution est un problème mal posé  (Einstein)
0
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 701
15 juin 2009 à 22:38
bonjour

Il me semble que ton code fonctionnes mais en changeant ainsi
        .Range("D" & reponse) = CDate(Txtdatearrive)
        .Range("E" & reponse) = IIf(CheckBox1, "Oui", "")

afin d'avoir une date correcte et seulement les "Oui" affichés
0
butters9547 Messages postés 208 Date d'inscription mardi 9 juin 2009 Statut Membre Dernière intervention 27 août 2013 6
16 juin 2009 à 08:34
oki merci,
mais ce que je vouidrais c'est que si je coche la checbox "vrai" cela m'affiche "oui" et idem pour la checkbox "faux". et qui si je ne coche rien cela ne m'affiche rien

merci ^^
0
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 701
16 juin 2009 à 08:58
bonjour

Désolé je n'avais pas tout compris mais alors, il suffit de faire :
        .Range("E" & reponse) = IIf(CheckBox1, "Oui", IIf(CheckBox2, "Non", ""))

et tu continues sur les autres.
0

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

Posez votre question
butters9547 Messages postés 208 Date d'inscription mardi 9 juin 2009 Statut Membre Dernière intervention 27 août 2013 6
16 juin 2009 à 09:09
merci
j'essaye sa plus tard (car la taf oblige :s) et je te dis

merci beaucoup en tout cas
0
butters9547 Messages postés 208 Date d'inscription mardi 9 juin 2009 Statut Membre Dernière intervention 27 août 2013 6
16 juin 2009 à 09:14
0