更改点颜色在图表的Excel VBA(Change the Point Color in chart

我有这个图表中，如果图形任何点超过特定的限制，然后它的颜色会改变。

任何人都可以建议我如何获得在图表中VBA，然后应用这种情况例如我想改变最高点的颜色在上面的曲线图。 任何帮助将高度赞赏。

Answer 1:

使用： ActiveWorkbook.Sheets("Sheet1").ChartObjects("Chart1").Chart.SeriesCollection(1)

每个点的颜色是.Points(PointNumber).Interior.Color

你有周期的点数，虽然是.Points.Count

每个点的值是.Points(PointNumber).Value

标记本身的颜色（仅适用于线，散点图和雷达图表）：

.Points(PointNumber).MarkerBackgroundColor = RGB(0,255,0)    ' green
.Points(PointNumber).MarkerForegroundColor = RGB(255,0,0)    ' red
.Points(PointNumber).MarkerStyle = xlMarkerStyleCircle ' change the shape

Answer 2:

让我们以另一种方法，它不需要任何代码。

假设你的数据是在列A（序列号或时间）和B值，在A2和B2开始，因为你的标签是在A1和B1。 我们将添加一个系列，包括从B列。该系列将在任何越轨的点前面画一个标记，以便原点仍然存在的任何偏差值的图表，而不是重新格式化这一点上，新系列显示点。

在单元格C1中输入“越轨”。

在小区C2中，输入检测异常点，像下式：

= IF（AND（B2> UPPERLIMIT，B2

这使值插入列C是否列B超过上限和下限，否则它把＃N / A进入塔C，＃N / A将不会导致一个绘制的点。

在C列中的数据复制，选择图表，并粘贴特殊作为一个新的系列。 格式化该系列已经没有线，你想用来指示出控制点的任何明显的标志。

文章来源: Change the Point Color in chart excel VBA