第1个回答 2018-01-15
假设RGB的颜色值放在D列(D2单元格到D300单元格),需要把E2到E300单元格按对应的RGB值填充背景色。
使用VBA代码:
Sub 填充背景色()
On Error Resume Next
Dim Rng As Range
For Each Rng In Range([E2], [E300])
Rng.Interior.Color = RGB(Split(Rng.Value, ",")(0), Split(Rng.Value, ",")(1), Split(Rng.Value, ",")(2))
Next Rng
End Sub
激活数据所在工作表,执行宏。本回答被网友采纳