Format Data Series Automatic color selection. Can it be turned off?

[steve case]

I am clicking on Source data and adding Series1 then Series2 and so on. Then I have to go back to the graph and mouse click each new automatically generated color and change it to the color I want, usually "Black"

I've played around with the macro recorder some:

Sub FormatData()
'
' FormatData Macro
' Macro recorded 3/29/2016 by Steve Case
'
' Keyboard Shortcut: Ctrl+q
'
    ActiveChart.SeriesCollection.NewSeries
    ActiveChart.SeriesCollection(2).Values = "=Sheet1!R1C1:R21C1"
End Sub
Sub ChangeDataSeriesColor()
'
' ChangeDataSeriesColor Macro
' Macro recorded 3/29/2016 by Steve Case
'
' Keyboard Shortcut: Ctrl+w
'
    ActiveChart.SeriesCollection(2).Select
    With Selection.Border
        .ColorIndex = 1
        .Weight = xlThin
        .LineStyle = xlContinuous
    End With
    With Selection
        .MarkerBackgroundColorIndex = xlNone
        .MarkerForegroundColorIndex = xlNone
        .MarkerStyle = xlNone
        .Smooth = False
        .MarkerSize = 3
        .Shadow = False
    End With
    ActiveChart.PlotArea.Select
End Sub

to see if there's a way to globally select all of the Series 1 through x and change them all at once. No luck!

I have data that's starting to form interesting patterns with multiple plots. I'm doing 25 Series per graph and I'd like to speed up the process. Manually right clicking and selecting ""data source" and "Add Series" is OK, it's the clicking on each data series then "Format Data Series" then "color" then "Black" then "OK" and on to the next series that maybe some color that's hard to see that gets to be tedious.

Any help and suggestions would be greatly appreciated.

 

[steve case]

This question has been answered here:
[h=1]Automatic color selection for selected chart labels[/h]