Case a coché

Y compris Power BI, Power Query et toute autre question en lien avec Excel
z
zapzap02
Nouveau venu
Nouveau venu
Messages : 5
Inscrit le : 25 novembre 2018
Version d'Excel : 2010

Message par zapzap02 » 25 novembre 2018, 18:18

Bjr,

je souhaite réalisé une action lorsque je coche une case a cocher( mettre en couleur une cellule) et réalise une autre action lorsque je decoche la meme case ( metrre la meme cellule dans une autre couleur )j'ai essayer avec une macro mais ca marche a moitié ca fonctionne quand je coche mais pas quand je decoche

le faute a la case a cocher en formulaire plutot qu'en activeX ?

J'aimerai que lorsque la case a cocher retour clé vehicule soit active la case controle VRAI soit Verte et rouge quand decoche
est til possible de change le texte Vrai par autre chose ?

je vous joint le fichier
Reporting TEST.xlsx
(23.32 Kio) Téléchargé 9 fois
Avatar du membre
LouReeD
Passionné d'Excel
Passionné d'Excel
Messages : 5'546
Appréciations reçues : 221
Inscrit le : 14 octobre 2014
Version d'Excel : 2013 FR, 2016 FR
Téléchargements : Mes applications
Contact :

Message par LouReeD » 25 novembre 2018, 18:37

Bonsoir,

il suffit (hors VBA) e passer par une MFC sur la valeur "Vrai" ou "Faux" de la cellule.

@ bientôt

LouReeD
Quelques règles à lire ICI ;;)
_______________________________________________Vous pouvez allez faire un tour sur : Index de "Mes applications" ;;)
z
zapzap02
Nouveau venu
Nouveau venu
Messages : 5
Inscrit le : 25 novembre 2018
Version d'Excel : 2010

Message par zapzap02 » 25 novembre 2018, 18:40

Merci de ta reponse mais je n'y comprend rien trop d'abreviation peut tu me faire un exemple et je me debrouillerai pour les autres ?
Avatar du membre
CB60
Membre impliqué
Membre impliqué
Messages : 2'389
Appréciations reçues : 17
Inscrit le : 14 mai 2007
Version d'Excel : 2003

Message par CB60 » 25 novembre 2018, 18:44

Bonsoir
Une MEFC doit suffire, me semble t il
Reporting TEST.xlsx
(11.81 Kio) Téléchargé 7 fois
Avatar du membre
LouReeD
Passionné d'Excel
Passionné d'Excel
Messages : 5'546
Appréciations reçues : 221
Inscrit le : 14 octobre 2014
Version d'Excel : 2013 FR, 2016 FR
Téléchargements : Mes applications
Contact :

Message par LouReeD » 25 novembre 2018, 18:46

Bonsoir,

vous sélectionnez la cellule E7, puis dans le menu accueil du ruban, sur la droite vous allez dans Mise en Forme Conditionnelle.
Nouvelle formules, sélectionnez MFC par formule, dans la barre de texte vous écrivez ceci:
=ET($E7="VRAI"), puis le bouton "mise en forme" sélectionnez remplissage vert, police verte également pour "effacer" le texte, puis OK
puis OK, puis dans la barre de texte "s'applique à" effacez ce qu'il y a puis avec la souris sélectionnez la colonne E de la ligne 7 à la ligne 20 (dans votre exemple) et après [Appliquer] ou [OK]

@ bientôt

LouReeD
Quelques règles à lire ICI ;;)
_______________________________________________Vous pouvez allez faire un tour sur : Index de "Mes applications" ;;)
Avatar du membre
xorsankukai
Membre impliqué
Membre impliqué
Messages : 1'389
Appréciations reçues : 121
Inscrit le : 7 octobre 2014
Version d'Excel : 2010 FR

Message par xorsankukai » 25 novembre 2018, 18:47

Bonsoir zapzap02, LouReeD, le forum,
J'aimerai que lorsque la case a cocher retour clé vehicule soit active la case controle VRAI soit Verte et rouge quand decoche
est til possible de change le texte Vrai par autre chose ?
Un exemple sans cases à cocher.....

Un double-clic en colonne B coche la case sélectionnée.
Si case cochée, on affiche "OK" et on colore en vert.
Si case décochée, on affiche "NOK" et on colore en rouge.
Copie de Reporting TEST-1.xlsm
(31.25 Kio) Téléchargé 12 fois
Cordialement,
xorsankukai

La connaissance, c’est partager le savoir qui nous fait grandir.
Avatar du membre
LouReeD
Passionné d'Excel
Passionné d'Excel
Messages : 5'546
Appréciations reçues : 221
Inscrit le : 14 octobre 2014
Version d'Excel : 2013 FR, 2016 FR
Téléchargements : Mes applications
Contact :

Message par LouReeD » 25 novembre 2018, 18:55

Bonsoir X-OR (et oui je fais toujours le même choix ! ;-) )
Il manque un Cancel=True dans le code afin que la cellule ne reste pas en "mode de saisie" ;-)

@ bientôt

LouReeD
Quelques règles à lire ICI ;;)
_______________________________________________Vous pouvez allez faire un tour sur : Index de "Mes applications" ;;)
z
zapzap02
Nouveau venu
Nouveau venu
Messages : 5
Inscrit le : 25 novembre 2018
Version d'Excel : 2010

Message par zapzap02 » 25 novembre 2018, 19:11

Merci je vais essaye de comprendre ca
Avatar du membre
xorsankukai
Membre impliqué
Membre impliqué
Messages : 1'389
Appréciations reçues : 121
Inscrit le : 7 octobre 2014
Version d'Excel : 2010 FR

Message par xorsankukai » 25 novembre 2018, 19:16

Bonsoir LouReed,

Merci pour ta correction, ;-b) ,
Je ne connaissais pas cancel= true, effectivement, c'est beaucoup mieux avec :P

L' ai-je bien placé ?
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

   Dim isect, Z$, plage
    plage = "B2:B100"
    
 If Target.Count = 1 Then
   Z = Target.Value
  Set isect = Application.Intersect(Target, Range(plage))
 If Not isect Is Nothing Then
   Target.Value = IIf(Z = "", "ü", "")
   Cancel = True
 End If
 End If
 
End Sub
Copie de Reporting TEST-1.xlsm
(32.72 Kio) Téléchargé 7 fois
Amitiés, :O-O:
xorsankukai

La connaissance, c’est partager le savoir qui nous fait grandir.
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message