AspectRatio Property

Microsoft Office Web Components Visual Basic

expression.AspectRatio

expression    Required. An expression that returns a ChChart object.

Remarks

This property has no effect on a 3-D Pie chart. Use the Thickness property to increase the thickness of a 3-D Pie chart.

Example

This example converts the first chart in Chartspace1 to a 3-D Column chart and then increases the width and depth of the chart.

Sub Format3DDepthWidth()

    Dim cht3DColumn

    ' 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 = chChartTypeColumnClustered3D

    ' Increase the depth of the chart in relation
    ' to it's width.
    cht3DColumn.ChartDepth = 125

    ' Increase the width of the chart in relation
    ' to it's height.
    cht3DColumn.AspectRatio = 80

End Sub