Why does the following code snippet make my gantt chart have more than 2 colors? This is the only place that I actually set a color, yet I get green, purple, yellow, red, etc colors too. Also, Is there a way that I can print out each seriescollection as it loops so I can see what exactly it's looping through?

Code:

For each oSeries In ActiveChart.SeriesCollection
If oSeries.PlotOrder Mod 2<>0 Then
oSeries.Border.LineStyle = x1None
oSeries.Interior.ColorIndex = xlNone
Else
oSeries.Interior.ColorIndex=5
End If
Next oSeries

Thanks!