correspondance des couleurs

[JORDAN]

Bonjour tout le monde, le Forum,

Je suis à la recherche d'un moyen d'obtenir la correspondance des codes de couleurs entre ColorIndex et BackColor du style : 1 - &H00000000& (Noir)

Sub tstcouleur()
Dim i As Integer
For i = 1 To 56
Cells(i, 1).Interior.ColorIndex = i
Cells(i, 2) = i
cells(i,3)= ???? (&H00000000& pour i=1)
Next i

Merci pour votre aide et bonne journée

 

[Gael]

Re : correspondance des couleurs

Bonjour Jordan,

Ci-joint 2 fichiers qui ne sont pas de moi mais répondront sans doute à toutes tes questions.

@+

Gael

 

[JORDAN]

Re : correspondance des couleurs

Bonjour Gael,

Merci pour tes 2 fichiers, ils répondent en beaucoup mieux à ma demande, le top

Bonne journée

 

[Risleure]

Re : correspondance des couleurs

Bonjour le Forum, Jordan, Gael

Petite précision dans le fichier Color97.xls, il te faudra peut être modifier la formule de la cellule J7.
=DECHEX() sur MON Excel 2003, elle ne fonctionne pas, il faut utiliser =DEC2HEX

A+

 

[JORDAN]

Re : correspondance des couleurs

Bonjour Risleure,

chez moi elle va bien, j'ai essayé avec ta modif et là ça ne va plus !!!
Dans ma liste de fonction j'ai seulement =DECHEX()
Merci quand même pour cette modif
Je viens de modifier mon profil, j'ai Office XP et non 2003
bonne journée