title: Change series name in all charts on a worksheet
body: <p>I am trying to loop through each chart on a single worksheet and rename the 3rd series:</p>
  
  <pre><code>With Sheets("Actual Traded Points")
      For Each Chart In .ChartObjects
          Chart.SeriesCollection(3).name = "Actual Traded Points"
      Next Chart
  End With
  </code></pre>
  
  <p>But the Chart object doesn't seem to have a seriesCollection object and I cannot work out how to get to it. What is the correct way to do this?</p>