Chart.AutoScaling (Word)

La valeur true si Microsoft Word met à l'échelle un graphique en 3D de sorte qu'il soit plus proche en taille du graphique 2D équivalent.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 .Chart.RightAngleAxes = True 
 .Chart.AutoScaling = True 
 End If 
End With