Charts (Chart 图表)![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() |
在一个图表点或趋势线上表示数据标签。在一个系列上,DataLabel 对象是 DataLabels 集合的成员之一,DataLabels 集合每个点上包含一个 DataLabel 对象。对于没有可定义点的系列(如一个区域系列),DataLabels 集合只包含一个 DataLabel 对象。
可用 DataLabels(index) 返回单个 DataLabel 对象,其中 index 为数据标签的编号。下例设置嵌入的第一个图表(在第一张工作表上)的第一个数据系列中的第五个数据标签的数字格式。
Worksheets(1).ChartObjects(1).Chart _
.SeriesCollection(1).DataLabels(5).NumberFormat = "0.000"
可用 DataLabel 属性为一个点返回 DataLabel 对象。下例打开一个名为“Chart1”的图表工作表上数据系列一中第二个数据点的数据标签,并将数据标签文本设置为“Saturday”。
With Charts("chart1")
With .SeriesCollection(1).Points(2)
.HasDataLabel = True
.DataLabel.Text = "Saturday"
End With
End With
在一条趋势线上,DataLabel 属性返回与趋势线一起显示的文本。它可以是一个公式,一个 R-平方值,或两者都有。下例设置趋势线文本仅显示公式,然后将数据标签文本放入名为 Sheet1 工作表的 A1 单元格中。
With Charts("chart1").SeriesCollection(1).Trendlines(1)
.DisplayRSquared = False
.DisplayEquation = True
Worksheets("sheet1").Range("a1").Value = .DataLabel.Text
End With