Discussion :

[JOHN14]

Bonjour à tous,

La question est simple :
Est-ce qu'il y a moyen avec VBA de lire les références de la plage source d'un graphique ?

Merci de vos réponses

[fring]

Bonjour,

Une solution éventuelle :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Sub test()
Dim i As Byte, Graf As ChartObject
 
Set Graf = Sheets(1).ChartObjects("Graph1")
 
For i = 1 To Graf.Chart.SeriesCollection.Count
    With Graf.Chart.SeriesCollection(i)
        Debug.Print .Name & " : " & .Formula
    End With
Next
 
End Sub

[JOHN14]

Merci.

C'est exactement cela. Et je crois qu'il n'existe pas d'autres solutions.
La manipulation des graphes sous VBA reste encore dans les lymbes.

Salutations