Connaître les numéros des séries d'un graphique

[Troudz]

Bonjour tout le monde,

Je voudrais créer une boucle qui me permette de supprimer toutes les séries d'un graphique sans forcément en connaître le nombre à l'avance. Une petite boucle de ce genre là :

For i = 1 to XXXXX
ActiveChart.SeriesCollection(i).Delete
Next

Seulement impossible de trouver une méthode qui me renvoi le nombre de séries contenues dans mon graphique.

Auriez vous une idée ?

Je vous remercie par avance de votre aide.

Bonne fin de journée

P.S. : Un oubli important : je peux difficilement me permettre d'utiliser un "On error resume next"

 

[Pierrot93]

Re : Connaître les numéros des séries d'un graphique

Bonjour,

pour avoir le nombre de séries :

MsgBox ActiveSheet.ChartObjects(1).Chart.SeriesCollection.Count

bon après midi
@+

 

[Troudz]

Re : Connaître les numéros des séries d'un graphique

Bonjour Pierrot93.

Arf, j'aurai pu le trouver tout seul si j'avais réfléchi correctement.

Merci pour ton aide Pierrot et bonne fin d'après midi.