Question

您好我目前正在使用Microsoft Excel 2010，我正在尝试更改图表上特定数据点的颜色（和其他属性）。到目前为止，我已经尝试过：

    ActiveChart.SeriesCollection(1).Points(4).Select
    With Selection
        .Interior.ColorIndex = 3
        .MarkerSize = 10
        .MarkerStyle = 8
    End With

代码运行正常，宏的其余部分运行完美，（大小变为10，样式更改）除了保持默认蓝色的颜色！我已经尝试将颜色索引更改为黑白 - 这似乎无法解决问题。

在探索之后我也试过了：

    ActiveChart.SeriesCollection(1).Points(4).Select
    With Selection
        .Interior.Color = RGB(255, 0, 0)
        .MarkerSize = 10
        .MarkerStyle = 8
    End With

我也尝试过：

.ForeColor = RGB(255, 0, 0)

和

.ForeColor.ObjectThemeColor = msoThemeColorBackground1

但我不确定最后一个是如何完全运作的。

我真的很感激这方面的一些帮助，如果有人愿意看一下，我很高兴PM给我一个例子副本！

（重申 - 函数的activechart部分工作正常 - 以下标记大小和样式更改）

- 哈希

Answer 1

您正尝试使用属于单元格的属性

来执行此操作

尝试使用此代替

With ActiveChart.SeriesCollection(1).Points(4)
    .MarkerBackgroundColor = RGB(255, 0, 0)
    .MarkerSize = 10
    .MarkerStyle = 8
end with

VBA图表/对象边框/填充颜色更改

1 个答案: