Maintenant que tout fonctionne je vais essayer de mettre ça sur mon vrai fichier...

Je veux utiliser ton code (en modifiant la cellule AD153 où il y a le calcul) pour avoir des couleurs sur mes autres tableau...

J'ai collé deux fois le code mais celui panique à cause du Sub Worksheet_Change(ByVal Target As Range)

qui revient plusieurs fois...

Je vais essayer de magouiller quelques chose pour éviter tous cela...