Excel Line Color??

[gigemboy]

Yes, yet another thread on Excel 2007/VS 2008/VSTO. I simply cannot change the line color on my charts. The below changes all work except the forecolor and backcolor properties. It loops through the series collection, setting the series line properties. What am I doing wrong??

MySeriesColl = MyChart.SeriesCollection 'required or else second series overwrites first one?
        For Each MySeries As Excel.Series In MySeriesColl
            MySeries.Format.Line.DashStyle = Microsoft.Office.Core.MsoLineDashStyle.msoLineSolid
            MySeries.Format.Line.Weight = "1"
            MySeries.Format.Line.Style = Microsoft.Office.Core.MsoLineStyle.msoLineSingle
            MySeries.Format.Line.ForeColor.RGB = Drawing.Color.Black.ToArgb
            MySeries.Format.Line.BackColor.RGB = Drawing.Color.Black.ToArgb
        Next

P.S. Should these threads be moved to the .NET forum? Or keep them here...

[Siddharth Rout]

Does this help?

'Please change values in the bracket for the resp color
MySeries.Format.Line.ForeColor.RGB = RGB(255, 127, 0)

Same for the backcolor...

[gigemboy]

No, that still has no effect. No matter what I try, that property doesn't seem to do anything.

[Siddharth Rout]

Try This in your code in this sequence

MySeries.Border.Color = RGB(255, 127, 0)
MySeries.Format.Line.ForeColor.RGB = RGB(255, 127, 0)

[gigemboy]

There is no Border property of the Excel.Series interop object in .NET

[Siddharth Rout]

There is no Border property of the Excel.Series interop object in .NET

Strange?
http://technet.microsoft.com/en-us/l.../cc179160.aspx

Border property has to be there for charts be it excel 97 or 2003 or 2007. (i could be wrong)

[kriswork]

An old thread, but this has just worked for me - I'm looping through all the series and setting the colour depending on which series:

Select Case .SeriesCollection.count
                        Case 1
                            .SeriesCollection(.SeriesCollection.count).border.color = Microsoft.Office.Interop.Excel.XlRgbColor.rgbRed
                        Case 2
                            .SeriesCollection(.SeriesCollection.count).border.color = Microsoft.Office.Interop.Excel.XlRgbColor.rgbBlack
                        Case 3
                            .SeriesCollection(.SeriesCollection.count).border.color = Microsoft.Office.Interop.Excel.XlRgbColor.rgbGreen
                        Case 4
                            .SeriesCollection(.SeriesCollection.count).border.color = Microsoft.Office.Interop.Excel.XlRgbColor.rgbBlue
                    End Select