excel - 如何将RGB颜色存储在变量中？

Question

我希望将 RGB 颜色存储在 Excel VBA 项目的变量中，以设置整个子单元中各个单元格/区域的背景颜色。

我想在变量中设置一次颜色，因此如果我决定在整个过程中更改它，我只需要在一处进行即可。

Dim clrBlue As ColorFormat
clrBlue = RGB(0, 0, 256)

Range("a2").Interior.Color = clrBlue
Range("b3").Interior.Color = clrBlue

使用上面的代码，我收到运行时错误:

Object variable or With block variable not set

我可以编写单独的函数(SetBlue、SetRed、SetGreen)来应用每种颜色，但这感觉很困惑。

有人可以建议我做错了什么吗？

Answer 1

RGB 返回一个 Long，因此您需要将 clrBlue 声明为 Long 而不是 颜色格式。

Dim clrBlue As Long

clrBlue = RGB(0, 0, 255)

Application.union(Range("A2"), Range("B3")).Interior.Color = clrBlue