Bonjour à tous,

J'ai cherché à accéder aux données des séries de chaque graph pour la feuille en cours, j'ai donc écris au départ:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub réinitGraphs()
 
    With Sheets(1)
        For Each obj In .ChartObjects
            With obj
                For Each serie In .SeriesCollection
 
                    Debug.Print serie.Name
 
                Next serie
            End With
        Next obj
 
    End With
 
End Sub
Puis j'ai réussi à le débugger en faisant:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub réinitGraphs()

    With Sheets(1)
        For Each obj In .ChartObjects
            obj.Activate
                For Each serie In ActiveChart.SeriesCollection
            
                    Debug.Print serie.Name
            
                Next serie
        
        Next obj
        
    End With

End Sub
(Changements en rouge)

Je ne comprends pas pourquoi le premier ne fonctionne pas. Je ne vois pas vraiment la différence, d'un coté j'ai un with sur le graph en cours, et je tente d'accéder à ses séries, mais ça ne fonctionne pas, de l'autre j'active le graph en cours et accède à ses séries.

Voilou, si quelqu'un a une explication ça m'intéresse de savoir!

Merci