ChartWrapCount Property Example

This example sets the ChartWrapCount and ChartLayout properties and then adds three additional charts to the specified chart workspace.

Dim chts(3)

ChartSpace1.ChartWrapCount = 2
ChartSpace1.ChartLayout = ChartSpace1.Constants.chChartLayoutHorizontal
For k = 0 To 2
    Set chts(k) = ChartSpace1.Charts.Add
Next