Bonjour,
J'ai fait 4 Mef conditionnelle en VBA et je bloque sur la dernière
Je voudrais que toutes les cellules qui ont un résulat à 0 est une police blanche (afin de conserver les calculs et de rendre le tableau plus lisible)
J'ai essayé ça
mais il ne se passe rien
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 .FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, Formula1:="0" .FormatConditions(5).Font.ColorIndex = 2
/I\ les 0 sont des valeurs suite à un copier valeur ; par contre dans une colonne il y a des "#DIV/0!"
J'ai également essayé ça
Mais Excel me dit qu'il y a incompatibilité
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 Dim c as range For Each c In Range("TbCarsat1[#data]") If c.Value <> "#DIV/0!" and c.Value = "0" Then c.Font.Color = RGB(255, 255, 255) 'Blanc Next
Cela a fonctionné sur toutes les 1ère cellule à 0, mais ça a bloqué à partir des "#DIV/0!", c'est pourquoi j'ai voulu les ajouter à la condition...
Est-ce que qq'1 peut m'aider ?
Partager