根据文本数据注释图表

根据文本数据注释图表

我有一张由包含以下内容的数据集生成的图表:

(date, value, annotation) 

注释是一个常量值 [它要么存在,要么为空白],我想将第三位数据添加到我已有的图表中。图像中就是一个例子。蓝线是 (日期,值) 图表的图形,我想将红点添加为图形 (日期,注释@值)。

有没有一种简单的方法可以在 Excel 中做到这一点,而无需修改数据的外观?

在此处输入图片描述

答案1

我可能会通过首先绘制“值”系列并为所有点添加数据标签来解决这个问题。接下来,将红色系列绘制为第二个“value2”系列,它是“值”系列的子集。然后,记录并修改一个类似于此的小宏,它将所有“值”标签替换为“注释”标签。这是我的小表格和图表以及宏。(我将图表命名为“myChart”。)希望这有意义!

Sub CustomLabels()

    Dim i, myCount
    ActiveSheet.ChartObjects("myChart").Activate
    myCount = ActiveChart.SeriesCollection(1).Points.Count

    For i = 1 To myCount
        ActiveChart.SeriesCollection(1).Points(i).DataLabel.Text = Range("C" & i + 1).Value
    Next i


End Sub

在此处输入图片描述

答案2

您可以遵循以下协议:

将主 X 轴更改为文本类型。在次轴上绘制第二个系列(注释)。确保注释系列使用 C 列作为其类别标签。删除 Excel 为您添加的任何次轴(系列仍将被视为位于不同的轴上,但都将使用主轴)。使用类别标签选项向注释系列添加标签。

答案3

我认为没有内置的方法可以做您想做的事情,因为数据标签仅限于系列名称、X 轴值或 Y 轴值,而不是另一个任意列。

有一个 sourceforge 项目插件看起来可以提供帮助:http://xltoolbox.sourceforge.net/annotate.html

相关内容