Couleur Ligne Liste Déroulante VBA [Résolu]

Pourtant j 'ai trouvé un fichier excel qui réalisait à peut pres ce que j 'aimerais avoir.Mais je ne sais pas comment adapter mon code.
J'ai trouvé le fichier sur cette discussion :http://forum.excel-pratique.com/...
Pensez vous que ce soit possible de faire la même chose avec des fleches?

Merci

L'exemple sur lien que tu met n'a absolument rien à voir avec ce que tu veux.
Je confirme... pas possible.
Salut Michel.. Ta solution change la couleur de TOUT le Combo et la demande est...
couleur différente à chaque valeur de la liste
A+

Salut michel_m,

Pour info, ça marche aussi sous Excel 2003.
Juste un petit correctif à ton code : bob83833 souhaite changer la couleur des caractères
Il faut donc remplacer BackColor par ForeColor.

En fait, il souhaitait avoir des couleurs préétablies pour chaque caractère, cad : qu'ils apparaissent dans la liste avec chacun sa couleur. Mais je crois que ce n'est pas possible et donc la modification s'impose sur l'ensemble de la liste. Est-ce que je me trompe ?

edit : Autre chose : son combobox est intégré dans la feuille word et dans ce cas le private sub UserForm_Initialize() ne marche pas pour charger les valeurs dans la liste à l'ouverture du fichier. Il faut lui substituer Private Sub Document_Open() qui lui va initialiser les valeurs dans la combobox.

Michel

Bonjour

en fait si on lit sa demande, il avait marqué backcolor mais bon!

il souhaitait avoir des couleurs différentes pour chaque caractère...
C'est possible à faire mais bonjour l'usine à gaz !!! Excel n'aime pas trop les "las vegas" ;-) et d'ailleurs je n'en vois encore moins l'utilité que de teinter chaque item...

Attendons donc la réaction de bobxxx
cordialement

Pour mieux comprendre de quoi il s'agit, ce fil de discussion est en fait la suite d'un fil sur lequel je viens d'intervenir, d'où mes commentaires.
http://www.commentcamarche.net/...
Je n'avais pas donné suite pour la mise en couleur car ça me paraissait assez complexe et en tout cas hors de mes compétences. Vous confirmez ce que je pensais question usine à gaz !

Michel

Merci pour vos réponses,

Effectivement c'est bien une couleur pour chaque carractére que je souhaite obtenir, backcolor était simplement là car je souhaitais simplement pouvoir le modifier.

Pour résumer, j'aurais besoin d'une liste déroulante avec 3 valeurs possibles :
une fleche verte vers le haut
une fleche Noire à l'horizontale
une fleche Rouge vers le bas.

Cette liste serait à inserer dans Word mais je pourrais si cela est vraiment necessaire le faire à partir d'excel.

J'espére que cela est plus claire maintenant?

Savez vous donc si cela est possible?

Merci encore pour votre aide

mais dans chaque item, tu n'as bien qu'un seul caractère ? soit flèche vers haut, flèche vers bas... ?

oui.
La liste peut donc afficher trois valeurs différentes :fléche haut, fléche bas, ou fléche a l'horizontale. Mais je voudrais que chaque fleche ai une couleur differente.

merci

Bin dans ce que je t'ai donné tu remplaces backcolor par forecolor comme l'indique Michel et tu choisis ta police qui te donne les flèches. tu as le classeur pour les couleurs...
tu supprimes
ComboBox1.BackColor = &HFFFFFF 'blanc

j'ai essayé de reprendre ton code sans rien changé et de le rataché à une nouvelle liste déroulante juste pour voir le résultat,seulement aucune valeur n'apparait dans la liste déroulante.

Bobo8388, la combobox a été paramétrée pour afficher les données souhaitées. Si vous voulez créer un nouvelle combobox, le plus simple c'est de copier coller celle que je vous ai faite, puis vous ouvrez les propriétés et vous lui changer le nom en ComboBox2 (ou 3 ou 4, c'est selon), nom que vous utilisez ensuite dans votre macro.
Ensuite, relisez mon message (le #4 ci-dessus) concernant le private sub pour que les valeurs apparaissent dans la liste.

Michel

On va atteindre le #t 234 tel que c'est parti !!!

Moi je décroche !
;-)

Bonjour à tous,

En complilant les différents code que vous m'avez donné j'ai réussi à faire ce que je souhaité.
Je poste le code ca pourra toujours servir.:


Private Sub Document_Open()
With ComboBox1
.AddItem "è"
.AddItem "ì"
.AddItem "î"
.BackColor = vbWhite
End With

End Sub

Private Sub ComboBox1_Change()
Select Case ComboBox1.Value
Case "è"
ComboBox1.ForeColor = vbBlue 'Bleu
Case "ì"
ComboBox1.ForeColor = vbGreen ' vert
Case "î"
ComboBox1.ForeColor = vbRed 'Rouge
End Select
End Sub

Police d'affichage = wendings.

Merci à tous

désoler d'être peut-être un peu "lourd", mais la solution que tu adopte et qui d'après toi correspond à ta demande ne correspond certainement pas à ton titre.
Si j'interprète littéralement ton titre >> Couleur Ligne Liste Déroulante tu voulais une couleur différente sur chaque ligne de ton combo cf le lien que tu met dans un de tes postes.
Que tu te contente de colorer TOUT le combo c'est ton affaire mais ne dis pas que ça correspond à ta demande et dis plutôt que tu t'en contentera.
A+

Pardon?
Mon niveau en VBA est certainement trés faible, mais je peux t'assurer que le résultat obtenue est bien celui que je voulais:
Chaque fléche qui s'affiche dans la liste déroulante à bien une couleur différente!!! c'est donc ce que je recherché!

Donc merci d'essayer de reformuler mes propos mais je les maintiens : cela correspond à ma demande!!!!