2

如何添加具有标签的自定义水平线,并且它与图表中的第一列处于完全相同的级别(请参见下面的屏幕截图)。

这可以在VBA中完成吗?

在此处输入图像描述

4

2 回答 2

3

这可以在 VBA 中完成,也可以在没有 VBA 的情况下完成:

http://peltiertech.com/Excel/Charts/AddLineHorzSeries.html

此方法涉及创建第二个 Y 轴,并在第二个轴上的“线”中绘制另一系列数据。

这是一个相当干净的解决方案。

否则,使用 VBA,您需要向图表添加形状/线条(将其添加到 chartObject 而不是 Worksheet 很重要)。

然后计算点的高度并使线的.Left= 图表的.PlotArea.Left和使线的.Width= 到图表的.PlotArea.Width. 然后.Top根据图表.PlotArea.Height减去您为该点计算的“高度”设置线的值。

于 2013-04-17T12:11:44.640 回答
2

使用 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在每个单元格中使用将线添加到图表中

于 2013-04-17T13:30:23.550 回答