Alvin:

example

Dim r As Double
Dim g As Double
Dim b As Double
Dim k As Long
For i = 1 To 56
Range("A" & i).Interior.ColorIndex = i
Range("B" & i) = i
k = Range("A" & i).Interior.Color
r = k Mod 256
b = Int(k / 65536)
g = Int((k - (b * 65536)) / 256)
Range("C" & i).Interior.Color = RGB(r, g, b)
Range("D" & i) = r & "," & g & "," & b
Next

--

http://www.vba.com.tw/plog/


"Alvin" wrote:

here's an example

Selection.Interior.Color = RGB(20,145,250)
will set the active cell's background to the specified RGB value

"benny" wrote:

I am attempting to write some code that will in excel fill a cell with a user
created colour using RGB values.

basically the user will enter in the red, green and blue values in 3
seperate cells then i want to know how to write some code to get those RGB
values into a fill pattern and fill a cell with it?

example - r=20, g=145, b=250; then the cell will be populated with the
colour those RGB values create.

any one out there with a solution for me? if its possible i would prefer to
want some code i can simply type into a cell, if its avoidable i dont want to
use macros.