VBA chart/object border/fill 颜色变化

VBA chart/object border/fill colour change

您好,我目前在 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 一个示例副本!

(重申 - 函数的活动图表部分工作正常 - 以下标记大小和样式更改也是如此)

-- 哈希

您正在尝试使用属于单元格的属性来执行此操作

试试改用这个

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