Couleur comboBox conditionnel -> String

youki · 22 Avril 2008

Bonjour, je bloque sur un probleme bete. Je désire mettre des section dans ma combobox, pour cela je voudrais faire un fond de couleur différent pour des parties qui contiennent le meme mot (cable, dalle) j'ai voulu faire du conditionnel avec une formule récupérée sur ce site

Code:

If Val(designation.Text) = 10 Then
        designation.BackColor = vbBlue
    Else
        designation.BackColor = vbWhite
    End If

Or si l'on change la valeur 10 par dalle ou "dalle" ou (dalle) rien y fait il me colorie tout ma combobox.

Si quelqu'un a une ptite idée.
Merci

Creepy · 22 Avril 2008

Re : Couleur comboBox conditionnel -> String

Bonjour,

Sauf erreur de ma part par défaut tu ne peux pas mettre des couleurs differentes dans ta combobox selon la valeur.

C'est tout ou rien !

@+

Creepy

Cousinhub · 22 Avril 2008

Re : Couleur comboBox conditionnel -> String

Bonjour,
bonjour Creepy

essaie avec ce code :

Code:

Private Sub designation_Change()
designation.BackColor = IIf(CStr(designation.Text) = "dalle", vbBlue, vbWhite)
End Sub

youki · 23 Avril 2008

Re : Couleur comboBox conditionnel -> String

Merci bien cela fonctionne pour une de mes combo. En revanche pour une autre les mots dalles, ou cables sont noyés dans une chaine et là ça ne fonctionne pas.
En tout cas ça me convient trés bien Merci bcp pour la rapidité et la précision des réponses. Well done.

Pierrot93 · 23 Avril 2008

Re : Couleur comboBox conditionnel -> String

Bonjour Youki, Bhbh, Creepy

peut être en modifiant le code comme suit :

Code:

designation.BackColor = IIf(designation.Value Like "*dalle*", vbBlue, vbWhite)

bon après midi
@+

Couleur comboBox conditionnel -> String

youki

XLDnaute Occasionnel

Creepy

XLDnaute Accro

Cousinhub

XLDnaute Barbatruc

youki

XLDnaute Occasionnel

Pierrot93

XLDnaute Barbatruc

Discussions similaires