Rotation Property

expression.Rotation

expression    Required. An expression that returns a ChChart object.

Example

This example converts the first chart in Chartspace1 to a 3-D Column chart and then rotates the chart 145 degrees.

Sub SetGapDepth()

    Dim cht3DColumn As ChChart

    ' Set a variable to the first chart in Chartspace1.
    Set cht3DColumn = ChartSpace1.Charts(0)

    ' Change the chart to a 3-D Column chart.
    cht3DColumn.Type = chChartTypeColumn3D

    ' Rotate the chart.
    cht3DColumn.Rotation = 145

End Sub