Just in case anyone else makes the same mistake as I did, the x1Up should use a lower case L and not a 1as it seems to appear. Otherwise you'll get an error. Many thanks to Ger Plante on the superb Ozgrid.com forum for the clarification
lastrow = Cells(Rows.Count, 1).End(xlUp).Row For i = 2 To lastrow R = Range(Cells(i, 1), Cells(i, 1)).Value G = Range(Cells(i, 2), Cells(i, 2)).Value B = Range(Cells(i, 3), Cells(i, 3)).Value Range(Cells(i, 4), Cells(i, 4)).Interior.Color = RGB(R, G, B) Next i
Just in case anyone else makes the same mistake as I did, the x1Up should use a lower case L and not a 1as it seems to appear. Otherwise you'll get an error.
Many thanks to Ger Plante on the superb Ozgrid.com forum for the clarification
Thanks for your help, I had the same mistake
👍 thanks!
Thanks¡¡¡
Thanks for this, and thanks to Neil Eyre in the comments for the fix of 1 to l, fixed it for me.
Is there any option to get RGB value in cells from fill colour?
Hi David, nice video. Is it possible to convert a spectrum (reflactance/transmittance) into CIE/RGB values in excel?
hello, if you want a worksheet for this let me know!
Wunderbar! thanks for sharing this !
How can i get sheet ?
thank~ your video help me a lot ~
hey, can you please send me the code ?
lastrow = Cells(Rows.Count, 1).End(xlUp).Row
For i = 2 To lastrow
R = Range(Cells(i, 1), Cells(i, 1)).Value
G = Range(Cells(i, 2), Cells(i, 2)).Value
B = Range(Cells(i, 3), Cells(i, 3)).Value
Range(Cells(i, 4), Cells(i, 4)).Interior.Color = RGB(R, G, B)
Next i
you are cool=)))