Chart.AutoScaling property (Project)
True if Project scales a 3D chart so that it is closer in size to the equivalent 2D chart. Read/write Boolean.
expression A variable that represents a Chart object.
For auto-scaling to work, the RightAngleAxes property must also be True.
In the following example, the chart is the first shape in the "3D chart" report. The example automatically scales the chart. The example should be run on a 3D chart.
Sub SetChartColor() Dim chartShape As Shape Set chartShape = ActiveProject.Reports("3D chart").Shapes(1) With chartShape .RightAngleAxes = True .AutoScaling = True End With End Sub
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.