Excel, case à cocher, conditionnelle ?

Résolu

Excel
Formule

Asfero -
Mike-31 Messages postés 18405 Date d'inscription Statut Contributeur Dernière intervention - 6 mai 2009 à 14:57

Bonjour,

Voici donc ma question sur Excel.

J'ai ajouter des cases à cocher dans mon document. Et j'aimerais que lorsque celles-ci soit cocher, un nombre s'affiche dans une case et lorsque non rien n'apparaisse dans cette même case.

Dans un autre sens comment introduire la case à cocher dans la fonction SI ?? ou existe-il une autre fonction ?

Merci de votre aide ( je suis plutot débutant avec excel)...

Répondre (17) Posez votre question

Répondre (17)

A voir également:

Excel si case cochée alors
Si ou excel - Guide
Liste déroulante excel - Guide
Excel cellule couleur si condition texte - Guide
Word et excel gratuit - Guide
Aller à la ligne dans une case excel - Guide

17 réponses

Réponse 1 / 17

Meilleure réponse

La meilleure réponse est la réponse qui a été validée par nos équipes.

Mike-31 Messages postés 18405 Date d'inscription Statut Contributeur Dernière intervention 5 131

Re,

Oui tout à fait, avec Excel il n'y a que des sokutions.

Alors clic droit sur ta case à cocher et format de contrôle, dans cellule liée tu sélectionnes un cellule exemple A1 qui serviera à contrôler ta case à cocher et dans laquelle s'inscrira VRAI ou FAUX selon que ta case est cochée ou non

Ensuite dans une autre cellule la formule est simple

=SI(A1=VRAI;125;"")

Si tu as quelques notions de VBA il serait préférable de passer par la barre contrôle et saisir un VBA

A+--

Un problème sans solution est un problème mal posé (Einstein)

Réponse 2 / 17

Asfero

Salut

Je viens d'essayer en VBA et une fois ma case créer comment je fais pour la cocher ?? pour vérifier si ce que j'ai écrit dans le script fonctionne ??

Mike-31 Messages postés 18405 Date d'inscription Statut Contributeur Dernière intervention 5 131

Re,
As tu fais un double clic pour coller le code, si oui avec le ceode que t'a donné notre ami le fait de cocher ta case tu obtiendras 125 en A1 ou rien su case décochée.
Peut être le mode création est resté activé, dans ta boite de contrôle, désactives le mode création (le bouton le avant dernier à droite, mode création)

A+--

Un problème sans solution est un problème mal posé (Einstein)

Réponse 3 / 17

Asfero

Salut ok je viens de comprendre !!!

maintenant j'ai une autre petite question.

Au lieu de mettre un chiffre est-il possible de faire référence a une autre cellule ??

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
[F50] = "D50"
Else
[F50] = ""
End If
End Sub

disons si je veux référer à la case D50???

merci

pijaku Messages postés 12263 Date d'inscription Statut Modérateur Dernière intervention 2 760

oui comme ceci :
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
[F50] = [D50]
Else
[F50] = ""
End If
End Sub

Réponse 4 / 17

Mike-31 Messages postés 18405 Date d'inscription Statut Contributeur Dernière intervention 5 131

Re,

Avec la solution de t'a proposé notre ami pijaku, tu affiche la barre à outils visual basi editor, clic sur la case à cocher de la barre , dessine à la souris ta boite et double clic dessus, ce qui va t'ouvrir une feuille blance avec --
Private Sub CheckBox1_Click()

End Sub

colles le code de pijaku entre les deux lignes

If CheckBox1.Value = True Then 'Si case à cocher = true (donc est cochée)
[A1] = "125" 'inscrire 125 en cellule A1
Else ' sinon
[A1] = "" ' ne rien inscrire (voir "effacer") en A1
End If

A+

Un problème sans solution est un problème mal posé (Einstein)

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

Posez votre question

Réponse 5 / 17

Asfero

et également comment supprimer le nom de l'objet checkbox 1 par exemple ???

merciiiiiiiii

pijaku Messages postés 12263 Date d'inscription Statut Modérateur Dernière intervention 2 760

Qu'entendez vous par le nom de l'objet?

Réponse 6 / 17

pijaku Messages postés 12263 Date d'inscription Statut Modérateur Dernière intervention 2 760

Re-
Pour faire ce que vous demandiez, j'ai utilisé la barre d'outils commande.
Effectivement, il faut comme l'a dit plus haut (post 9) l'ami Mike, dessiner votre case à cocher et double cliquer dessus. Ensuite compléter par le code VBA sus-dit...
Quand vous fermez VBA vous retournez donc sous excel et là il convient de cliquer sur l'icône, dans la barre "commandes", représentant une équerre un crayon et une règle, pour changer de mode.
Ensuite, cela doit fonctionner...

Réponse 7 / 17

Asfero

Merci Pijaku et Mike mais la mon problème c'est ca hehe

Au lieu de mettre un chiffre est-il possible de faire référence a une autre cellule ??

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
[F50] = "D50"
Else
[F50] = ""
End If
End Sub

disons si je veux référer à la case D50???

merci

Réponse 8 / 17

Mike-31 Messages postés 18405 Date d'inscription Statut Contributeur Dernière intervention 5 131

Re,

Remplace cette ligne

[F50] = "D50"

par

[F50] = Range("D50")
[F50] = [D50]

Pour effacer--
checkbox 1

Passe en mode création clic sur l'avant dernier bouton de la barre visual basic, doubles clic sur la case à cacher, ce qui va t'ouvrir la propriété de ta case, dans la marge de gauche (propriétés Checkbook1 cherche Caption, en face tu auras Checkbook1, efface le ou donne un nom à ta boite

A+

Un problème sans solution est un problème mal posé (Einstein)

Réponse 9 / 17

Asfero

C'EST GENIAL !!!!!!!!!!!!!

merci a tous de votre patience !!!!!!!!!

Réponse 10 / 17

Mike-31 Messages postés 18405 Date d'inscription Statut Contributeur Dernière intervention 5 131

Re,

N'oublis pas de mettre ton statut en résolu ou demande à la modération de le faire pour toi en cliquant sur le triangle du dernier post.

Suis les conseils de notre ami pijaku, inscrit toi comme membre c'est plus sympat

A+--

Un problème sans solution est un problème mal posé (Einstein)

Réponse 11 / 17

pijaku Messages postés 12263 Date d'inscription Statut Modérateur Dernière intervention 2 760

Re-
petite variante si vous voulez que lorsque l'on décoche la case à cocher vous n'ayez plus rien d'inscrit dans votre cellule de destination :

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then 'Si case à cocher = true (donc est cochée)
[A1] = "125" 'inscrire 125 en cellule A1
Else ' sinon
[A1] = "" ' ne rien inscrire (voir "effacer") en A1
End If
End Sub

Réponse 12 / 17

Asfero

Bonjour
merci pour les réponses

en fait je suis un peu à la bourre, je m'inscrirai plus tard...

j'essaie de cliquer 2 fois sur la case à cocher mais tout ce qui ce passe s'est qu'elle se coche et décoche..... il n'y a pas une autre façon avec une référence à la case et la fonction SI ??

Merci de votre aide

Réponse 13 / 17

Mike-31 Messages postés 18405 Date d'inscription Statut Contributeur Dernière intervention 5 131

Salut tout le monde,

Il faut voir avec quelle boite à outils les cases à cocher ont été créées, barre formulaire ou boite de contrôle

A+--

Un problème sans solution est un problème mal posé (Einstein)

Réponse 14 / 17

Asfero

barre formulaire....

tu as une solution ??

Réponse 15 / 17

Asfero

Salut

j'ai réussis un truc mais ca affiche vrai ou faux ,et cette cellule est associé à mon autre cellule y'a pas moyen de changer ces valeurs ou supprimez le passage par la cellule vrai,faux ???

Réponse 16 / 17

Asfero

Salut

Merci pour ta réponse, mais ce processus la je viens de le comprendre.... ce qui m'énerve c'est de passer par une cellule ou s'indique vrai ou faux, il n'y a aucune moyen de supprimer cette cellule et que la case a cocher donne directement je sais pas moi 0 ou 1 ?

sinon quand j'ouvre le VBA je vois vraiment pas ce qu'on m'a décrit.....

Réponse 17 / 17

pijaku Messages postés 12263 Date d'inscription Statut Modérateur Dernière intervention 2 760

Bonjour Asfero,
Pourquoi rester "anonyme", inscrivez vous sur CCM et posez toutes les questions que vous souhaitez... remarquez vous pouvez également les poser en tant que non-inscrit, mais c'est beaucoup moins sympa (en tout cas pour celui qui réponds).
Ensuite, pour la question 1 supposons que vous vouliez inscrire 125 dans la cellule (et oui en excel on parle de cellule, pas de case) A1 :
- double clic sur la case à cocher
Une fenêtre VBA s'ouvre avec ceci dedans :
Private Sub CheckBox1_Click()

End Sub
inscrivez ceci entre private sub... et end sub :
If CheckBox1.Value = True Then
[A1] = "125" 'ici vous pouvez modifier la cellule de destination et le chiffre à y indiquer
End If
vous voyez donc :

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
[A1] = "125"
End If
End Sub

et fermez la fenêtre
Voilà.

-1

Répondre Posez votre question

Votre réponse

Discussions similaires

excel : case vide au lieu de 0

chouag -
rick -

4 réponses

Remplacement valeur 0 par Vide dans Excel

Ludozebest -
maylulu -

10 réponses

Remplacement du zero par une cellule vide !?

Tony -
OGNono -

12 réponses

Excel formule : savoir si une cellule contient partie texte

plunderer007 -
francois -

14 réponses

fonction du type "CASE" dans excel

pleduc -
anonyme -

4 réponses

Calculer un nombre de cellules

vivi -
sysaid -

5 réponses

Devenez membre en quelques clics

Connectez-vous simplement avec ceux qui partagent vos intérêts
Suivez vos discussions facilement et obtenez plus de réponses
Mettez en avant votre expertise et aidez les autres membres
Profitez de nombreuses fonctionnalités supplémentaires en vous inscrivant

S'inscrire