Coloriser les secteurs d'un graph d'après les couleurs des cellules contenant les don

[Wily]

Bonjour

Je souhaite Coloriser les secteurs d'un graph d'après les couleurs des cellules contenant les données

En cherchant sur le Forum, je suis tombé sur ce post de MyDearFriend! qui semble bien corresponde à ce que je souhaite
Il parait très facile d'utilisation, cependant je n'arrive pas à le reproduire

J'ai adapté les données de mon graph dans son code, du moins essayé !
Mais cela plante au niveau de
ActiveSheet.ChartObjects("Graphique 8").Chart.SeriesCollection(1) _
.Points(Target.Row - 5).Interior.Color = Cel.Interior.Color

A vrai dire je ne comprends pas le code :
.Chart.SeriesCollection(1)
et de .Points(Target.Row - 5)

Si quelqu’un peut m'aider à résoudre ce problème

Je joins le fichier de MyDearFriend!
Ainsi que le mien

Merci
A Plus

 

[Roland_M]

Re : Coloriser les secteurs d'un graph d'après les couleurs des cellules contenant le

Bonjour

il te faut changer les couleurs car sur Excel2007(perso) elles n'existent pas !
prend celles indiquées par mDF elles fonctionnent bien

ensuite ici, c'est -2 et pas -5 vu que tu pars de F3 ! mDF part de B6 c'est pour cela qu'il a -5 !
.Points(Target.Row - 2).Interior.Color = Cel.Interior.Color

j'ai fais ces modif et essai, c'est ok mais ...
par contre je ne comprend pas pourquoi la couleur "Doonée 1" n'apparaît jamais dans le graph !?

 

[Wily]

Re : Coloriser les secteurs d'un graph d'après les couleurs des cellules contenant le

Bonjour Roland

Merci pour tes conseils
J'ai fait les modifs comme tu m'as dit
Cela est Ok aussi pour moi

Par contre j'ai rencontré les mêmes problèmes avec les Données 1
Puis tout d'un coup cela c'est mis à fonctionner
Pourquoi ? mystère ??
Mais maintenant que les données 1 fonctionnent, c'est les données 8 qui ne fonctionnent plus ???

Pas plus de 7 données à la fois ??
Non certainement pas, mais je n'arrive pas à trouver la cause !
Si il y a quelqu'un qui voit la cause .....

A+