XL 2010 Combobox avec couleur

[Dydou76]

Bonjours,

J'ai deux liste dans une feuil1 "nom" et une liste avec des "oui" et des "non" et j'aimerai que quand je sélectionne un nom dans ma combobox, qu'il s'affiche en rouge pour les "oui" et en vert pour les "non"
Est-ce possible SVP Merci d'avance

Denis

 

[Mimi]

Bonjour,
Private Sub ComboBox1_Change()
SendKeys "{RIGHT}"
Select Case Me.ComboBox1.Value
Case "oui"
Me.ComboBox1.BackColor = RGB(0, 160, 0)
Case "non"
Me.ComboBox1.BackColor = RGB(192, 0, 0)
End Select
End Sub

 

[Dydou76]

Bonjour Mimi

Merci pour ta reponse rapide. Mais il ne vas pas dans la deuximeme colonne "B" pour savoir si c'est oui ou non ?

 

[xUpsilon]

Bonjour,

Effectivement ça ne me semble pas suffisant. Je pense qu'il faut ici passer par une fonction VLookup et allez chercher la valeur de la combobox dans ta liste de nom et retourner la valeur associée (oui ou non) et ainsi attribuer la couleur.

Bonne continuation

 

[xUpsilon]

Voir ci-joint un exemple.

Bonne continuation

 

[Dydou76]

Merci beaucoup ça fonctionne bien sur l'exemple mais pas sur mon fichier original, faut que je recherche le pourquoi lol

 

[Dydou76]

ahh il faut peux être que je dise sur quel feuille se trouve la cellule A1 et B ?

 

[xUpsilon]

Euh y a aucune raison pour que ça ne fonctionne pas a priori, as tu d'autres macro sur ton document ? Il est structuré pareil que le fichier exemple ?

 

[Dydou76]

Bonjour,
oui il y a d'autre combobox et des textbox ect.. sur l'userform je te le met en pièces jointe de toute façon il y a pour le moment aucune info derangeante c'est pour mon boulo.

 

[xUpsilon]

Re,

Voici la version corrigée.
Le problème était que j'ai codé avec un fichier d'une seule feuille, donc il allait chercher les infos sur la feuille active (pas celles où il y a les informations du coup dans le cas de ton application). Bref ça fonctionne maintenant.

Ah et aussi, j'ai échangé les "oui" et "non", car j'imagine que quand c'est oui ça doit être vert, et quand c'est non ça doit être rouge ? (c'était l'inverse dans la macro).

Bonne continuation

 

[Dydou76]

Youpiiiii ça marche Mille MERCI !!!
pour info c'est bien l'inverse pour les couleurs, c'est rouge quand c'est "oui"(c'est pour mettre en évidence le produit dangereux donc en rouge) et quand c'est vert, le produit n'est pas dangereux.
Voila j'airai probablement encore besoin d'aide (je suis novice mais j'adore créer des petit programme) donc tu risque de me revoir ici lol
Encore Merci et peux être a bientôt lol

 

[xUpsilon]

Ah autant pour moi, eh bien je te laisse échanger les couleurs alors.

Je t'en prie, reviens nous voir quand tu t'ennuieras ! 😉

Bonne continuation

 

[Dydou76]

ca y ai je m'ennui déjà lol quand je valide un nom dans l'userform et qui renseigne la cellule A2, j'aimerai que l'heure se mettre en cellule C2 (début du contrôle).

 

[xUpsilon]

Re,

Comme ceci ?

Bonne continuation

 

[Dydou76]

oui tres bien juste a ajouter l'heure dans la textbox de l'userforme lol merci encore