Using color property with multiple series

[User (Legacy)]

I'm trying to use the chartfx color property to change the color of one

point to highlight the slected point.  It worked fine when I had one series,

but with multiple series, it just isn't working.  I'm using the following

code and the formula in the color statement is from the help file.  the

results I'm getting are that more that one point in each series is getting

the highlight color and the two series highlight DIFFERENT points.  When I

step through the code the highlight color is only being called for the

correct point in each series.

   ChartFX1.MultipleColors = True

    If ChartFX1.Gallery <> PIE And ChartFX1.Gallery <> DOUGHNUT And

ChartFX1.Gallery <> PYRAMID Then

        ChartFX1.OpenDataEx COD_COLORS, ChartFX1.NValues , 0

        Dim j As Integer

         For ser = 0 To (ChartFX1.nSeries - 1)

            For j = 0 To (ChartFX1.NValues - 1)

                If (j = selPoint) Then

                    ChartFX1.Color(ser + (j * ChartFX1.nSeries)) =

vbHighlight

                Else

                    ChartFX1.Color(ser + (j * ChartFX1.nSeries)) = normColor

                End If

            Next j

         Next ser

        If selPoint <> 0 Then

            normColor = ChartFX1.Color(0)

        Else

            normColor = ChartFX1.Color(1)

        End If

        ChartFX1.CloseData COD_COLORS

attache.zip