Propriedade Chart.AutoScaling (Project)

True se o Project dimensionar um gráfico 3D para que ele esteja mais próximo do tamanho do gráfico 2D equivalente. Boolean de leitura/gravação.

Sintaxe

expression. AutoScaling

expressão Uma variável que representa um objeto Chart.

Comentários

Para que o dimensionamento automático funcione, a propriedade RightAngleAxes também deve ser True.

Exemplo

No exemplo a seguir, o gráfico é a primeira forma no relatório "gráfico 3D". O exemplo dimensiona automaticamente o gráfico. O exemplo deve ser executado em um gráfico 3D.

Sub SetChartColor()
    Dim chartShape As Shape
    
    Set chartShape = ActiveProject.Reports("3D chart").Shapes(1)
    With chartShape
        .RightAngleAxes = True
        .AutoScaling = True
    End With
End Sub

Valor de propriedade

BOOL

Confira também

Propriedade Chart ObjectRightAngleAxes

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.