couleur par formule

[patrol]

salut a tous

je voudrais savoir si il est possible d'affecter une couleur par une formule
sans passer par une MFC

ex : si 8.7 x 18.25 est sup a 180 la couleur est rouge
si 8.7 x 18.25 est comprise entre 175 et 180 la couleur est orange
si 8.7 x 18.25 est comprise entre 165 et 175 la couleur est verte

petite explication le 18.25 est constant seul le 8.7 est variable
en esperant m'etre expliqué a peut pres comme il faut

merci
patrol

 

[Catrice]

Re : couleur par formule

Bonjour,

Un début de solution avec les formats nombres.
Mais il n'y a pas de Orange, les couleurs dispos sont : [Noir] [Bleu] [Cyan] [Vert] [Magenta] [Rouge] [Blanc] [Jaune].

De plus les < à 165 sont verts egalement ...

Voir exemple joint

 

[skoobi]

Re : couleur par formule

Bonjour,

Oui, par VBA, mais ne sachant pas si tu veux cette solution...
A te lire.

 

[wilfried_42]

Re : couleur par formule

bonjour patrol, catrice

logiquement, c'est infaisable, une fonction ne peut mettre à jour une cellule en direct, comme catrice le dit, seul un format personalisé peut le faire mais uniquement pour le text

maintenant je ne peux assurer la rapidité de la macro, c'est complexe mais c'est faisable, si le format specialisé te suffit, utilise le !

oups : bonnjour Skoobi, il est lent le wil ce jour !

 

[patrol]

Re : couleur par formule

merci a vous trois

si par VBA c'est faisable

skoobi peut tu me donner l'exemple en fonction des données que j'ai founis

merci

patrol

 

[skoobi]

Re : couleur par formule

Re,

variable = 9.9
resultat = variable * 18.25
ActiveCell.Interior.ColorIndex = Switch(resultat > 180, "rouge", (resultat > 175 And resultat <= 180), "orange", (resultat >= 165 And resultat <= 175), "vert")

remplace les textes de couleur par leur code (sans les guillemets).