Transformer couleur en valeur numérique VoirCette macro permet d'obtenir le code d'une couleur, pour traitement ultérieur selon votre besoinSub distri_couleur()
Dim i
For i = 1 To 12
Worksheets(1).Range("C" & i).Value = Worksheets(1).Range("B" & i).Interior.Color
Next i
End...