excel - 在 VBA 中设置 RGB 值时出现 Excel 错误 5

Question

我使用宏记录器创建了这个 VBA 脚本。当我将 G 或 B 参数更改为 0 以外的任何值时，我会收到“无效的过程调用或参数（错误 5）”

这似乎很奇怪，因为有效值是 0 到 255？

有任何想法吗？

Sub Change_Colour_1()
    ActiveSheet.Shapes.Range(Array("Rectangle 1")).Select
    With Selection.ShapeRange.Fill
        .Visible = msoTrue
        .ForeColor.RGB = RGB(100, 0, 0)
        .Transparency = 0
        .Solid
    End With

标签： excelvba