我试图在我的图表中添加一条线作为一个指示器,但无论如何我都想不出我能做到。
lrow = ThisWorkbook.Sheets("ABC").Cells(Rows.Count, 1).End(xlUp).Row
Charts.Add
ActiveChart.ChartType = xlBarStacked
ActiveChart.SetSourceData Source:=Sheets("ABC").Range("A2:AE" & lrow), PlotBy:= xlColumns
ActiveChart.Location Where:=xlLocationAsObject, Name:="ABC"
ActiveChart.HasTitle = True
ActiveChart.ChartTitle.Text = "XYZ"
ActiveChart.Axes(xlValue).MajorGridlines.Delete
ActiveChart.ChartTitle.Font.Size = 11
Set cht = ActiveChart假设我的数据就像
John Jack Jesse
Exam 1 5 6 4
Exam 2 6 7 5
Exam 3 1 4 9
Exam 4 3 9 8
Exam 5 8 6 1你可以想象一张条形图会是什么样子。现在,我如何在这张图中添加一条垂直线,假设值为25,它将指示任何超过25的栏,并类似于作为区分线或优行。因此,每条总共三条现在将有一个名字和分数在每次考试中得分。如果你采取另一种方式,我们可以把每一个单独的考试加起来,得出总数。因此,我需要绘制的线将工作,以显示这些人中是否有超过25人。希望这能解释。提前谢谢。
发布于 2015-08-21 21:20:01
╔════════╦══════╦══════╦═══════╗
║ ║ John ║ Jack ║ Jesse ║
╠════════╬══════╬══════╬═══════╣
║ Exam 1 ║ 5 ║ 6 ║ 4 ║
║ Exam 2 ║ 6 ║ 7 ║ 5 ║
║ Exam 3 ║ 1 ║ 4 ║ 9 ║
║ Exam 4 ║ 3 ║ 9 ║ 8 ║
║ Exam 5 ║ 8 ║ 6 ║ 1 ║
║ Goal ║ 25 ║ 25 ║ 25 ║
╚════════╩══════╩══════╩═══════╝它应该非常类似于您当前的情况,只有最后一个数据系列(在本例中是目标系列6 )被更改为一行,而不是堆叠的栏。您可以根据源数据中的行/序列数动态插入此值,类似于您对lrow所做的操作。

https://stackoverflow.com/questions/32148033
复制相似问题