AutoScaling Property
True if Microsoft Excel scales a 3-D chart so that it's closer in size to the equivalent 2-D chart. The RightAngleAxes property must be True. Read/write Boolean.
Example
This example automatically scales Chart1. The example should be run on a 3-D chart.
With Charts("Chart1")
.RightAngleAxes = True
.AutoScaling = True
End With