Thread: Loops
View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Hannes Hannes is offline
external usenet poster
 
Posts: 30
Default Loops

Thanks a lot Nick!

"Nick Hodge" wrote:

Hannes

For the activechart

Sub deleteSeries()
Dim sc As Series
For Each sc In ActiveChart.SeriesCollection
sc.Delete
Next sc
End Sub

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
HIS


"Hannes" wrote in message
...
Hello there,

Can anyone help me with a code that delets all series in a certain chart?
No
matter how many series there are.

Thanks....