我的工作表中有三列颜色数据。它们分别标记为 R、G 和 B,包含 0 到 1 之间的浮点值。如何根据 R、G 和 B 值为每行的第四个单元格的背景着色?
谢谢。
当您将鼠标悬停在单元格上时,此代码有效:
=HYPERLINK(SetRGB(D2,A2*255,B2*255,C2*255),"HOVER!")
但我想预先计算每一行的颜色。
答案1
请尝试此代码:
Private Sub Worksheet_Calculate()
Range("D1").Interior.Color = RGB(Range("A1"), Range("B1"), Range("C1"))
End Sub