RGB在excel vba中填充颜色

RGB在excel vba中填充颜色,vba,excel,Vba,Excel,我的任务是生成一个颜色代码。我在三个不同的列中列出了RGB值,大约有256行RGB值。我需要填充与每行中的rgb值对应的颜色 这就是它被列出的方式。我需要在这个旁边生成相应的颜色代码 Sub ChangeRowColorBasedonAtoCRGBValues() Dim lRw As Long lRw = Cells(Rows.Count, "A").End(xlUp).Row For i = 1 To lRw Range("A" & i).EntireRow.Inter

我的任务是生成一个颜色代码。我在三个不同的列中列出了RGB值,大约有256行RGB值。我需要填充与每行中的rgb值对应的颜色

这就是它被列出的方式。我需要在这个旁边生成相应的颜色代码

Sub ChangeRowColorBasedonAtoCRGBValues()
Dim lRw As Long

lRw = Cells(Rows.Count, "A").End(xlUp).Row

For i = 1 To lRw
    Range("A" & i).EntireRow.Interior.Color = _
        RGB(Cells(i, "A").Value, Cells(i, "B").Value, Cells(i, "C").Value)
Next i

End Sub