Bonjour,
J'ai également eu du mal à trouver la réponse. Les données sources peuvent être consultées et modifiés avec la propriété Formula de la Série. On dispose aussi des propriétés FormulaLocal, FormulaR1C1 et FormulaR1C1Local.
Voici un petit exemple qui illustre le modification des données sources d'un graphique Excel.
Sub ListCharts()
Dim ws As Worksheet
Dim co As ChartObject
For Each ws In Worksheets
Debug.Print ws.Name
For Each co In ws.ChartObjects
Debug.Print "------------"
Debug.Print co.Chart.Name
Debug.Print co.Chart.CodeName
Debug.Print co.Chart.PlotArea.Height
Debug.Print co.Chart.PlotArea.Top
Dim se As Series
Dim seNum As Integer
seNum = 1
For Each se In co.Chart.SeriesCollection
se.Formula = Replace(se.Formula, "$12", "$10")
Debug.Print "("; CStr(seNum); ") "; se.Name
Debug.Print "("; CStr(seNum); ") "; se.Formula
Debug.Print "("; CStr(seNum); ") "; se.FormulaLocal
Debug.Print "("; CStr(seNum); ") "; se.FormulaR1C1
Debug.Print "("; CStr(seNum); ") "; se.FormulaR1C1Local
seNum = seNum + 1
Next 'Series
Next 'ChartObjects
Next 'Worksheets
End Sub
La valeur de la propriété Formula est du type :
=SERIES(,Feuil2!$B$2:$B$12,Feuil2!$C$2:$C$12,1)
Marc