Chart.AutoScaling (Word)

True se o Microsoft Word dimensiona um gráfico 3D para que fique mais perto do tamanho do gráfico 2D equivalente. A propriedade RightAngleAxes deve ser verdadeiras. Boolean de leitura/gravação.

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