Re aussi
Il y a quand même des résultats illisibles (police foncée sur fond foncé) et des couleurs de remplissage tellement proches qu'on les confond ! ... Mais si tu dis que tu arriveras à te débrouiller, je n'en ferai pas des insomnies
Pour ce qui est de ce (magnifique ) dégradé, j'ai simplement utilisé le contenu de la cellule pour définir la couleur de remplissage (en multipliant la valeur pour "étendre" la palette). Dans le module de la feuille concernée, teste :
Sub couleurs()
For lig = 3 To 113
For col = 5 To 7
If Cells(lig, col) <> "" Then Cells(lig, col).Interior.Color = Cells(lig, col).Value * 25
Next col
Next lig
End Sub
Si le jeu de couleurs ne convient pas, modifie simplement le '25' en fin de ligne 4 et ré-exécute la macro.
Les numéros de lignes et colonnes seront évidemment à adapter en fonction de ta situation réelle