添加图表数据
单元格图表的数据是一个双精度小数集合,DrawCell事件的e参数Chart有个AddValues方法,用于向这个集合中添加数据:
例如新建一个文件,在DrawCell事件中写入代码:
If
e.Col.Name
= "第一列"
Then
e.chart.AddValues(1,7,4,2,8,3)
e.DrawChart()
End
If
就可以在第一列看到图表:
我们可以分多次添加,可以一次添加多个,也可以一次添加一个,下面是等效的代码,分成了三次添加:
If
e.Col.Name
= "第一列"
Then
e.chart.AddValues(1,7,4)
e.chart.AddValues(2,8)
e.Chart.AddValues(3)
e.DrawChart()
End
If
我们也可以一次性地将某个集合或数组中的数据添加到图表中,例如:
If
e.Col.Name
= "第一列"
e.chart.AddValues("1,7,4,2,8,3".split(","))
e.DrawChart()
End
If
提示:
集合中至少有两个值,才能生成图表,否则按默认方式绘制单元格。