Propriété Chart.Legend (Project)

Article
04/07/2023

Obtient un objet Office.IMsoLegend qui représente la légende d’un graphique. IMsoLegend en lecture seule.

Syntaxe

expression. Légende

expression Variable qui représente un objet Chart.

Exemple

L’exemple suivant montre comment activer la légende du graphique, puis définir le haut de la légende 20 points plus bas que celui défini précédemment.

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

Valeur de la propriété

IMSOLEGEND

Voir aussi

Objet Chart

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.

Partager via