ExcelBanter - View Single Post

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