fonction colorie

[tanerbus]

j'aimerais la fonction inverse de celle ci je veut mettre de la couleur si il y ecris :noir,rouge ect ....
remarque : mise en forme conditionnelle imposible car plus de 3 condition

Function couleurFond(c)
Application.Volatile
Select Case c.Interior.ColorIndex

Case 1
couleurFond = "noir"
Case 3
couleurFond = "rouge"
Case 5
couleurFond ="bleu"
' ect ........
Case 48
couleurFond ="vert"

couleurFond = "JeSaisPas"
End Select
End Function

'merci d'avance

 

[BOISGONTIER]

Re : fonction colorie

Bonjour,

Impossible.
Une fonction envoie une valeur mais ne peut être une action

JB

 

[tanerbus]

Re : fonction colorie

pas grave je vais contourner le probleme avec une macro qui s'excute quand la cellule = une couleur

merci pour l'info