steve case
Well-known Member
- Joined
- Apr 10, 2002
- Messages
- 823
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:
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.
I've played around with the macro recorder some:
Code:
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.