Excel colorier cellules selon pourçentage Résolu/Fermé

Question

Bonjour à tous!

Encore un topic avec le coloriage de cellules... :S  malheureusement je n'ai pas réussi à trouver mon bonheur en cherchant déjà dans les discussions existantes..

Voici ce que j'aimerai obtenir:

si %   > 30%                       alors vert
si %   entre 30% et 10%    alors bleu clair
si %   entre 10% et -10%   alors jaune
si %   entre -10% et -30%  alors orange
si %   < -30%                      alors rouge

Cellules concernées par cette macro:

(U8:U215)  et  (W8:W215)

Voili voilou... si quelqu'un peut me donner un coup de main.. 

Un grand merci!

Sangoran

Configuration: Windows 2003 / Internet Explorer 6.0

m@rina · Accepted Answer

Bonjour, 

Il faut une macro événementielle. Quelque chose comme ça, à mettre dans le code de la feuille : 

Private Sub Worksheet_Change(ByVal Target As Range) 
Dim cellule As Range 
Set cellule = Application.Intersect(Range("U8:U215, W8:W215"), Target) 
If cellule Is Nothing Then Exit Sub 
'On Error Resume Next 
Select Case Target.Value 
Case Is < -30 
Target.Interior.ColorIndex = 3 
Case Is < -10 
Target.Interior.ColorIndex = 45 
Case "" 
Target.Interior.ColorIndex = xlNone 
Case Is < 10 
Target.Interior.ColorIndex = 6 
Case Is < 30 
Target.Interior.ColorIndex = 34 
Case Is > 30 
Target.Interior.ColorIndex = 43 
End Select 

End Sub-- 

m@rina 
- "Sur le forum bureautique, on pose des questions concernant la bureautique..." 
- "Ah bon ???"

Raymond PENTIER · Answer

Bonjour.
Le recours à une macro n'est pas obligatoire. On peut utiliser la mise en forme conditionnelle : 3 conditions donc 4 formats possibles avec Excel 2003 ; sans limitation avec Excel 2007.

m@rina · Answer

Bonjour,

Je pense que tu as dû agir sur plusieurs cellules à la fois ce qui ne marche pas avec une formule événementielle qui fonctionne sur le changement d'une seule cellule.

Retire l'apostrophe avant On Error Resume Next, mais ça ne règlera pas le problème de modifier plusieurs cellules à la fois.

Par ailleurs, j'avais oublié que tu traitais de % , donc à la place des chiffres entiers, il faut que tu mettres des décimales (en format américain) :
A la place de 30 => 0.3
A la place de - 10 => - 0.1
etc.

m@rina

Excel colorier cellules selon pourçentage

3 réponses

Discussions similaires