Conversion ColorIndex vers RGB

Bonjour,
je souhaite que mes etiquettes de données soient de la meme couleur que la courbe, pour cela, j'essaie de faire ceci :

Code:

---

.DataLabel.Font.ColorIndex = ThisWorkbook.Charts(NomGraph).SeriesCollection(NumSerie).Border.ColorIndex

---

seulement, ca ne marche pas..

je voulais donc savoir si on pouvait effectuer une conversion d'un indexcolor vers le code RGB, afin d'utiliser la propriété color

Merci !

Bonjour

Va jeter un coup d'oeil sur ce tuto : http://silkyroad.developpez.com/VBA/...CodesCouleurs/ de SlikyRoad, il devrait te donner des indications.

Starec

:oops: je ne vois pas en quoi cela peut m'aider, étant donné que je ne dispose que de l'index color... A moins que j'ai raté une conversion...

Code:

---

1 2 3 4 5

toto = ThisWorkbook.Charts(NomGraph).SeriesCollection(NumSerie).Border.ColorIndex   With ThisWorkbook.Charts(NomGraph).SeriesCollection(NumSerie).Points(s + 1) .DataLabel.Font.ColorIndex = toto End With

---

je ne comprend pas mon pb :
- l'index color de ma courbe vaut 57 (toto)
- on peut pas affecter 57 à l index color de l etiquette, Pourquoi ?? (alors que 5 ca marche..)

Si c'est le 57 qui est pas bon, pkoi c ma couleur alors ?

merci !