Bonjour,

Ci-dessous mon code vba
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Sub test()
 
With ThisWorkbook.Sheets("Feuil2")
    .Activate
    .ChartObjects("Graphique 2").Select
End With
 
MsgBox ActiveChart.SeriesCollection(1).Formula
 
End Sub
Ce code fonctionne bien si j'ai une sélection continue de mes données (exemple : =SERIE(Feuil2!$A$1;;Feuil2!$A$1:$A$11;1) )
Par contre en Excel 2007 ça ne fonctionne pas pour un sélection discontinue (exemple :
=SERIE(Feuil2!$A$1;;(Feuil2!$A$2;Feuil2!$A$4;Feuil2!$A$6;Feuil2!$A$8;Feuil2!$A$10);1) )

Cela fonctionne dans tous les cas sur Excel 2003 et 2007.

Pouvez-vous m'aider à trouver la bonne formule ?

Merci d'avance