Mettre en relation une chekbox et le contenu d'une cellule

Résolu/Fermé
fleurette85 Messages postés 270 Date d'inscription lundi 24 septembre 2007 Statut Membre Dernière intervention 1 août 2013 - 23 janv. 2013 à 11:13
fleurette85 Messages postés 270 Date d'inscription lundi 24 septembre 2007 Statut Membre Dernière intervention 1 août 2013 - 23 janv. 2013 à 16:33
Bonjour,

Je souhaite mettre en relation une chekbox avec le contenu d'une cellule d'un tableau.

J'ai un tableau qui se charge à partir d'une base de données et je souhaite lier son contenu avec une case à coché de la sorte que :

Si le contenu de la celulle du tableau = "exemple" alors ma chekbox devrait passer en état coché

Pouvez vous me proposer une solution s'il vous plait

Merci

2 réponses

lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
23 janv. 2013 à 11:51
Bonjour,
Pour lier un CheckBox à u une cellule elle ne peu contenir que VRAI ou FAUX
Donc c'est pas vraiment possible.
A+
0
fleurette85 Messages postés 270 Date d'inscription lundi 24 septembre 2007 Statut Membre Dernière intervention 1 août 2013 2
23 janv. 2013 à 12:07
Oui c'est ce que je veux faire mais il faut que la valeur du checkbox change de faux à vrai selon le contenu de la valeur de ma cellule du tableau

Si ma cellule contient "exemple" alors il faut que l'état de ma checkbox passe à vrai

Il y a surement un moyen de le faire non :(
0
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
23 janv. 2013 à 13:27
Il y aurais moyen avec une cellule supplémentaire mais à quoi servirai alors le CheckBok ?
0
fleurette85 Messages postés 270 Date d'inscription lundi 24 septembre 2007 Statut Membre Dernière intervention 1 août 2013 2
23 janv. 2013 à 14:21
C'est juste dans ce cas là la ChekBox a une autre utilité aussi .

Pour la cellule supplémentaire je ne pense pas en avoir besoin car je veux le faire avec la cellule de mon tableau
0
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
23 janv. 2013 à 14:56
C'est juste dans ce cas là la ChekBox a une autre utilité aussi
Explique..
0
fleurette85 Messages postés 270 Date d'inscription lundi 24 septembre 2007 Statut Membre Dernière intervention 1 août 2013 2
23 janv. 2013 à 15:58
J'ai trouvé une solution :

If Range("exp").Value="exemple" Then
Worksheets("cache").Range("check1")=True
Worksheets("cache").Range("check2")=True
Worksheets("cache").Range("check3")=False
Else
Worksheets("cache").Range("check1")=False
Worksheets("cache").Range("check2")=False
Worksheets("cache").Range("check3")=True
End if


Sachant que "exp" est le nom de la cellule dans mon tableau
0
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
23 janv. 2013 à 16:03
Beh oui, tu a donc mis des cellules intermédiaires comme je disais.
Mais où est l'intérêt des checkBox... A quoi y servent ?
Si tu clic dessus y se passe quoi ????
0
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
23 janv. 2013 à 16:12
Et bien que je n'en vois pas l'utilité tu peu remplacer le code par..
Dim B As Boolean
    B = Range("exp").Value = "exemple"
    With Sheets("cache")
        .Range("check1") = B
        .Range("check2") = B
        .Range("check3") = Not B
    End With
0
fleurette85 Messages postés 270 Date d'inscription lundi 24 septembre 2007 Statut Membre Dernière intervention 1 août 2013 2
23 janv. 2013 à 16:14
C'est juste visuel utile pour l'utilisateur
0
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
23 janv. 2013 à 16:17
Mais alors il y a des solutions BEAUCOUP plus élégantes avec des MFC
0