Propriedade Chart.Legend (Project)

Artigo
04/07/2023

Obtém um objeto Office.IMsoLegend que representa a legenda de um gráfico. IMsoLegend somente leitura.

Sintaxe

expressão. Lenda

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

Exemplo

O exemplo a seguir ativa a legenda do gráfico e define a parte superior da legenda 20 pontos menor do que foi definida anteriormente.

Sub SetLegendTop()
    Dim chartShape As Shape
    Dim reportName As String
    Dim legendTop As Double
    
    reportName = "Simple scalar chart"
    Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
    
    chartShape.Chart.HasLegend = True
    legendTop = chartShape.Chart.Legend.Top
    chartShape.Chart.Legend.Top = legendTop + 20
End Sub

Valor de propriedade

IMSOLEGEND

Confira também

Objeto Chart

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.