Excel 更改工作表上所有图表中的系列名称

Excel 更改工作表上所有图表中的系列名称,excel,vba,Excel,Vba,我尝试在单个工作表上循环浏览每个图表,并重命名第3个系列: With Sheets("Actual Traded Points") For Each Chart In .ChartObjects Chart.SeriesCollection(3).name = "Actual Traded Points" Next Chart End With 但是Chart对象似乎没有seriesCollection对象,我无法确定如何访问它。正确的方法是什么?您实际上是在图

我尝试在单个工作表上循环浏览每个图表,并重命名第3个系列:

With Sheets("Actual Traded Points")
    For Each Chart In .ChartObjects
        Chart.SeriesCollection(3).name = "Actual Traded Points"
    Next Chart
End With

但是Chart对象似乎没有seriesCollection对象,我无法确定如何访问它。正确的方法是什么?

您实际上是在图表对象中循环,而不是在图表中循环。尝试:

For Each co In .ChartObjects
    co.Chart.SeriesCollection(3).name = "Actual Traded Points"
Next co

它很管用,谢谢!但我不明白的是,如果我将co.Chart添加到watch窗口并展开它,为什么我看不到SeriesCollection对象?