C
cmoran
Using Excel 2000, I am having a color issue with charts that exceed 5
series. Below is some sample VBA to reproduce the issue. The cod
creates a bar chart with 60 series. The RGB color I have chosen i
white (255, 255, 255). You will notice that beginning with series 57
the color of the columns no longer gets assigned the color that I want
Excel starts auto-assigning colors at this point. I have reproduce
this faithfully 100% of the time. Has anyone seen this before? I
there a programatic workaround so that I don't have to manually chang
the colors after the fact?
Thanks-
Craig
Sub TestColors()
series_count = 60
Charts.Add
ActiveChart.ChartType = xlColumnClustered
ActiveChart.HasLegend = False
For i = 1 To series_count
ActiveChart.SeriesCollection.NewSeries
With ActiveChart.SeriesCollection(i)
.Name = "Data Series # " & i
.Values = "1"
.Interior.Color = RGB(255, 255, 255)
End With
Next i
End Su
series. Below is some sample VBA to reproduce the issue. The cod
creates a bar chart with 60 series. The RGB color I have chosen i
white (255, 255, 255). You will notice that beginning with series 57
the color of the columns no longer gets assigned the color that I want
Excel starts auto-assigning colors at this point. I have reproduce
this faithfully 100% of the time. Has anyone seen this before? I
there a programatic workaround so that I don't have to manually chang
the colors after the fact?
Thanks-
Craig
Sub TestColors()
series_count = 60
Charts.Add
ActiveChart.ChartType = xlColumnClustered
ActiveChart.HasLegend = False
For i = 1 To series_count
ActiveChart.SeriesCollection.NewSeries
With ActiveChart.SeriesCollection(i)
.Name = "Data Series # " & i
.Values = "1"
.Interior.Color = RGB(255, 255, 255)
End With
Next i
End Su