通过

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 支持和反馈，获取有关如何接收支持和提供反馈的指南。