Merci H2SO4, j'aimerai atteindre tes compétences... Mais j'ai encore du chemin à faire !!!
J'aimerai que tu m'expliques comment la couleur change suivant la ligne svp.
Si j'ai bien saisi, tu as identifié toutes les colonnes qui doivent changer de couleur, donc si dans le futur mon fichier de départ change, il faudra que je rentre les nouvelles colonnes ?
Merci
'Paramètre pour le changement de couleur en fonction du nb de vendors
For k = 1 To x
j = dlx + k - 1
'Désignation des colonnes qui doivent changer de couleur
r = "D" & j & ":G" & j & ",I" & j & ",K" & j & ",M" & j & ",O" & j & ":U" & j & ",W" & j & ",Y" & j & ",AA" & j & ",AC" & j & ":AD" & j & ",AD" & j & ",AF" & j & ",AH" & j & ",AJ" & j & ",AL" & j & ":AM" & j & ",AO" & j
Range(r).Interior.Color = Sheets("param").Cells(k, 1).Interior.Color
Next k
dlx = dlx + x 'on incrémente le dlx
Next i