使用柱状图

如果要使用柱状图，只需将ChartType属性设置为1。

例如新建一个文件，在DrawCell事件写入代码：

If e.Col.Name = "第一列" Then
    e.Chart.AddValues(3, -2, 4, 2, 8, -3)
    e.Chart.ChartType = 1 '使用柱状图'
    e.Chart.ShowNegative = True '标记负值
    e.DrawChart()
End If

得到的代码为：

可以对柱状图进行一些设置，例如将DrawCell事件代码改为：

If e.Col.Name = "第一列"  Then
    e.Chart.AddValues(3, -4, 4, 2, 8, 5)
    e.Chart.ChartType = 1 '使用柱状图'
    e.Chart.SeriesColor = Color.Gray '设置图表颜色'
    e.Chart.ShowHigh = True '标记最大值
    e.Chart.HighMarkerColor = Color.Red '设置最大值标记颜色
    e.Chart.ShowLow= True '标记最小值
    e.Chart.LowMarkerColor = Color.Green '设置最小值标记颜色
    e.DrawChart()
End If

得到的图表为：

有关柱状图的更多设置，请参考：单元格图表属性参考