Making bulk change to chart type in workbook pages

Copper Contributor

I have a workbook of line graphs created with "Line with Marker" selection.  I need to change all 50+ line  graphs to just Line.  Is there an option to change all workbook pages at same time OR must I change each page one-by-one.  Thanks,

1 Reply

@gflory 

Run this short macro:

Sub ModifyCharts()
    Dim w As Worksheet
    Dim c As ChartObject
    For Each w In Worksheets
        For Each c In w.ChartObjects
            c.Chart.ChartType = xlLine
        Next c
    Next w
End Sub