VBA Code to change 1 series to vary colors by point

[anthonyexcel]

I have 3 series in a chart. Is it possible to get one of the series in a to vary colors by point without changing them manually?

 

[wigi]

Yes. If you click on a series, you activate that series.
If you click again on a point of that series, you can format the selected point - and only that one.
This way, you can choose several colors or other formatting options.

 

[anthonyexcel]

wigi, thanks for your response. I understand that part I not looking to click on a selected point just wondered if there was a way of getting around that in VBA. My ultimate goal is to have one of the series color by point automatically. Lets say that series 1 is red, series 2 is green and series 3 is blue. I would like to take series 3 and have it automatically color itself with different colors. Is this do able in VBA?

 

[wigi]

Here is a VBA code example. It will operate on the active chart:

Sub ColorChartSeriesPoints()
    For Each pt In ActiveChart.SeriesCollection(3).Points
        pt.Interior.ColorIndex = Int(Rnd * 56)
    Next
End Sub

 

[wigi]

A different code example (for a pie chart) could be found here:
http://www.ozgrid.com/forum/showthread.php?t=156704