Excel 2016 VBA 在图表上显示每第 n 个数据标签

Question

我有一个折线图，显示了 2011 年至 2016 年期间多家航空公司的收入 - X 轴上每季度（Q1-Q4，每年）绘制数据点

我只想显示每个航空公司每年第四季度的数据标签（在图表上）。 我想这样做并保持轴原样。

任何建议将不胜感激，

谢谢！ （我有 Excel 2016）

Answer 1

如果您想通过 VBA 宏添加标签，您的问题没有明确表达。 我建议做以下事情：

Dim sData as Series
For i = 1 to sData.Points.Count Step 4
 sData.Points(i).ApplyDataLabels
Next i

请注意，如果系列中的点 i 没有值，则标签似乎不会显示。 花了一段时间才找出为什么没有将标签添加到图表中。 为了检测这种情况，我编写了以下测试：

If sData.Points(i).HasDataLabel Then
 If Len(sData.Points(i).DataLabel.Text) = 0 Then
  ...
 End If
End IF

Answer 2

在网上搜索了一下（大约 3 分钟，也许你应该花同样的时间）找到了这篇文章：

http://www.cs.mun.ca/~n39smm/Excel/Data%20Label.pdf

这是简历，但我建议查看文档，因为有很多图形。

1. 在添加数据标签之前，单击要标记两次的栏。
2. 单击标签，然后右键单击并选择格式化数据标签。
3. 选中类别名称并取消选中值。

在询问之前进行一些研究可以为您节省大量时间。