AspectRatio Property

This content is no longer actively maintained. It is provided as is, for anyone who may still be using these technologies, with no warranties or claims of accuracy with regard to the most recent product version or service release.

Returns or sets a Long specifying the ratio of height to the width of the specified three-dimensional chart. Setting this property to a value greater than 100 will make a chart which is taller than it is wide, while a value less than 100 will make a chart wider than it is tall. Valid settings range from 0 to 500. Read/write.

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