Chart.ApplyDataLabels 方法 (Project)

将数据标签应用到图表中的所有系列。

语法

表达式。ApplyDataLabels (Type，IMsoLegendKey，AutoText，HasLeaderLines，ShowSeriesName，ShowCategoryName，ShowValue，ShowPercentage，ShowBubbleSize，Separator)

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

参数

名称	必需/可选	数据类型	说明
Type	可选	Office.XlDataLabelsType	要应用的数据标签的类型。 默认值为 xlDataLabelsShowValue。
IMsoLegendKey	可选	Variant	True 显示图例项标示点旁。 默认值为 False。
AutoText	可选	Variant	如此 如果对象自动生成合适的文字内容。
HasLeaderLines	可选	Variant	如果数据系列有引导线，则该属性值为 True 。
ShowSeriesName	可选	Variant	如果为 True ，则为数据标签启用系列名称。 如果为 False ，则禁用系列名称。
ShowCategoryName	可选	Variant	如果为 True ，则为数据标签启用类别名称。 如果为 False ，则禁用类别名称。
ShowValue	可选	Variant	如果为 True ，则为数据标签启用值。 如果为 False ，则禁用该值。如果未指定 Type 参数，则假定 ShowValue 为 True。
ShowPercentage	可选	Variant	如果为 True ，则启用数据标签的百分比。 如果为 False ，则禁用百分比。
ShowBubbleSize	可选	Variant	如果为 True ，则为数据标签启用气泡大小。 如果为 False ，则禁用气泡大小。
Separator	可选	Variant	数据标签的分隔符。

返回值

Nothing

示例

以下示例将数据标签应用于每个数据点。

Sub SetDataLabels()
    Dim chartShape As Shape
    Dim reportName As String
    
    reportName = "Simple scalar chart"
    Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
    
    chartShape.Chart.ApplyDataLabels
End Sub

另请参阅

Chart 对象

支持和反馈

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