使用Python操作Excel图表之为最后一个数据点添加数据标签_excel 折线图只给最后一个数据加标签-优快云博客

本文链接：https://blog.youkuaiyun.com/scochi/article/details/129469515

文章介绍了数据标签在Excel图表中的作用，以及如何通过手动和Python脚本自动添加数据标签。在Excel中，数据标签用于显示图表数据点的具体值，提高数据可读性。通过Python调用相关API，可以高效地为多个系列的图表添加或修改数据标签，尤其适用于处理大量数据和复杂图表的情况。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

添加数据标签

是什么

我们咨询了一下new bing，他告诉我们，数据标签是一种用来描述业务实体特征的数据形式。在Excel中，您可以使用数据标签来显示图表中每个数据点的值。例如，在折线图中，您可以在每个数据点上添加一个数据标签，以显示该点的确切值。
在Excel中，添加数据标签的方法是：

• 选中图表，点击“设计”选项卡，然后点击“添加图表元素”按钮。

• 在弹出的菜单中，选择“数据标签”，然后选择想要的位置，比如居中、上方、下方等。

• 如果想要更改数据标签的格式或内容，可以右键点击任意一个数据标签，在弹出的菜单中选择“设置数据标签格式”或“更多选项” (jingyan.baidu.com)。
NewBing的结果

为什么

在Excel中，我们经常会使用个折线图，其中需要添加数据标签对于不同的系列进行标注和区分，有些时候系列数过多，手工添加会影响工作效率，同时重合的系列难以选中，因此我们选择使用Python调用相关API来添加数据标签。

如何做

def add_data_labels():
    xl = win32.gencache.EnsureDispatch('Excel.Application') # 启动Excel
    xl.Visible = True # 显示Excel
    wb = xl.ActiveWorkbook # 获取活动工作簿
    ws = wb.ActiveSheet # 获取活动工作表
    chart = wb.ActiveChart # 获取活动图表
    # Apply data labels to the chart.
    # chart.ApplyDataLabels(constants.xlDataLabelsShowValue, True, True, False, False, False, True, False, False, False)
    # chart.SeriesCollection(2).HasDataLabels = False
    # pts = chart.SeriesCollection(7).Points
    # chart.HasDataTable = False
    for i in range(1, chart.SeriesCollection().Count+1): # 遍历图表中的系列
        # chart.SeriesCollection(i).HasDataLabels = False
        pts = chart.SeriesCollection(i).Points() # 获取系列中的点
        print(i, pts.Count)
        #
        values = list(chart.SeriesCollection(i).Values)
        for j in range(len(values)):
            if values[j+1:] == [None for t in range(len(values)-j-1)]:
                try:
                    chart.SeriesCollection(i).Points(j+1).ApplyDataLabels(constants.xlDataLabelsShowValue, False,
                                                                            True, True, True, False, True, False,
                                                                            False, ',')
                    print(chart.SeriesCollection(i).Points(j+1).DataLabel.Text)
                    chart.SeriesCollection(i).Points(j+1).DataLabel.Font.Size = 8
                except:
                    pass
                break