Colorier le fond des cellules en rouge pour les valeurs negatives

[radix57]

Salut,

Comment colorier le fond des cellules en rouge pour les valeurs negatives

j'utilise une copie incrémentale pour recopier une formule de calcul.

Selection.AutoFill Destination:=Range("A2:A25"), type:=XlFillDefault

mais cela ne fonctionne pas.

Si vous avez une idée.

Je prends

 

[jpierre]

salut a toi


essaie le format conditionnel , c'est très simple

sinon en vba

Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlLess, _
Formula1:="0"
Selection.FormatConditions(1).Interior.ColorIndex = 3


je vous rappelle atous que le vba s'apprend aussi par l'intermediare de l'enregistreur de macro!!! ( je crois que cela fait la 200000 de fois que l'on le precise)
cela m'as pris 3secondes chronos
A+

jpierre

A+

 

[radix57]

En effet je suis passé par le format conditionnel

Merci pour la rapidité de la reponse.