The ChartStyles Collection

Customizing Chart Elements> Programming ChartStyles

The ChartStyles Collection

The ChartStyles collection contains the ChartStyle objects defined for each series. The following methods are defined for the ChartStyles collection:

Add(index) Add a new ChartStyle object to the collection

Remove(index) Remove a ChartStyle object from the collection

Normally, you will not need to add or remove ChartStyle objects from the collection yourself. If a ChartStyle object already exists when its corresponding series is created, the previously created ChartStyle object is used to display the data in this series.

By looping through the ChartStyles collection, you can quickly change the behavior of all of the bars, lines or points in a chart. For example, the following code lightens all of the bars in a chart whenever the mouse is clicked:

Private Sub Chart2D1_Click()

       Dim Style As Object
       For Each Style in Chart2D1.ChartGroups(1).Styles
              Style.Fill.Color = Style.Fill.Color + &H50505
       Next Style

End Sub

Note that this only works if the Color property is initially set to an RGB color value (if the most significant bit is set to 0).

Examples

The following statement sets the color of the first bar in a chart to green:

Chart2D1.ChartGroups(1).Styles(1).Fill.Color = RGB(0,128,0)

The following sets the line pattern for the second line in a plot to a dotted line:

Chart2D1.ChartGroups(1).Styles(2).Line.Pattern = oc2dLineDotted

And the following statement sets the symbol style for the third line in a plot to an unfilled circle:

Chart2D1.ChartGroups(1).Styles(3).Symbol.Shape = oc2dShapeCircle