Trouver le nom de chart en VBA

Bonjour,

J'ai plusieurs graphe sur une page et je souhaiterai leur affecter des series. La plage de serie a mettre dans le graphe n'est pas fixe et depend d'une autre fonction. J'ai fait un record Macro :

Code:

---

1 2	ActiveChart.FullSeriesCollection(1).Select ActiveChart.FullSeriesCollection(1).Name = "=Analysis!$F$2:$F$31"

---

Je voudrais Recuperer la variable correspondante a ActiveChart. Le chart s'appelle Chart7 donc j'ai essayé

Code:

---

Chart7.FullSeriesCollection(1).Select

---

Ca ne fonctionne pas.

Des idees ?

Si c'est un objet graphique dans une feuille

Code:

---

Worksheets("Feuil1").ChartObjects("Chart7").Chart.FullSeriesCollection(1).Name 'Adapte les noms

---

Si c'est une feuille graphique

Code:

---

Sheets("Chart7").FullSeriesCollection(1).Name

---