How to format a data series in a single setting?

[JenniferMurphy]

Unless there is something that I don't understand, always a likelihood, if I want to change the color of a data series in a scatter plot, I have to change 3 settings: the line, the markers, and the marker fill. This seems like an unnecessary inconvenience. Is there a way to change all three with a single setting?

Thanks

 

[rlv01]

Since I often have each of those things set to a different color, your unnecessary inconvenience is my essential feature. If you always set to one color, why not write a custom function to do that?

Sub SetSeriesColor(WS As Worksheet, ChartName As String, SeriesNumber As Long, SeriesColor As Long)
    With WS.ChartObjects(ChartName).Chart.SeriesCollection(SeriesNumber)
        .MarkerBackgroundColor = SeriesColor
        .MarkerForegroundColor = SeriesColor
        .Format.Line.BackColor.RGB = SeriesColor
        .Format.Line.ForeColor.RGB = SeriesColor
    End With
End Sub

Sub Test()
    SetSeriesColor ActiveSheet, "Chart 1", 2, vbBlue
    SetSeriesColor ActiveSheet, "Chart 1", 2, vbYellow
    SetSeriesColor ActiveSheet, "Chart 1", 2, vbRed
End Sub

 

[JenniferMurphy]

Since I often have each of those things set to a different color, your unnecessary inconvenience is my essential feature. If you always set to one color, why not write a custom function to do that?

It would be my guess that having them all the same color is very common, if not the most common arrangement. But providing me with a way to set all three with one setting needn't prevent you from setting them all to different colors. They just need to provide a "set all the same" checkbox.

Thanks for the code. If no one comes with a better (simpler) solution. I'll probably use it. It just annoys me that I have to write yet another macro to make up for functions that should be included.

Thanks