Removing a serie in a chart

[Renaud]

I'm answering to myself. I finally found. Here is the solution:


Code:
--------------------
While Charts("Chart1").SeriesCollection.Count > 0
Charts("Chart1").SeriesCollection.Item(1).Delete
Wend
--------------------


But if you've better ideas, i'm taker.

Renaud