Chart.Legend 属性 (Project)

获取代表图表图例的 Office.IMsoLegend 对象。 只读 IMsoLegend。

语法

表达式。传说

expression：一个表示 Chart 对象的变量。

示例

以下示例打开图表的图例，然后将图例的顶部设置为比之前设置的低 20 磅。

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

属性值

IMSOLEGEND

另请参阅

Chart 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。