如何添加具有标签的自定义水平线,并且它与图表中的第一列处于完全相同的级别(请参见下面的屏幕截图)。
这可以在VBA中完成吗?
这可以在 VBA 中完成,也可以在没有 VBA 的情况下完成:
http://peltiertech.com/Excel/Charts/AddLineHorzSeries.html
此方法涉及创建第二个 Y 轴,并在第二个轴上的“线”中绘制另一系列数据。
这是一个相当干净的解决方案。
否则,使用 VBA,您需要向图表添加形状/线条(将其添加到 chartObject 而不是 Worksheet 很重要)。
然后计算点的高度并使线的.Left
= 图表的.PlotArea.Left
和使线的.Width
= 到图表的.PlotArea.Width
. 然后.Top
根据图表.PlotArea.Height
减去您为该点计算的“高度”设置线的值。
使用 vba,您可以添加一个新系列:
With ActiveChart.SeriesCollection.NewSeries
.Values = "={6.9,6.9,6.9,6.9}"
'create string beforehand if number and values are unknown
.ChartType = xlLine
'and whatever other formatting is needed
End With
不使用 VBA,您可以在数据中添加一个新列,并将其全部等于第一项,=$B$2
在每个单元格中使用将线添加到图表中