Do you mean

..Interior.ColorIndex = Range("A1").value

--
__________________________________
HTH

Bob

"Roger on Excel" wrote in message
...
I use code to fills in cells for the color red - the number for red is 3.

Thus the selected line in the code reads :

.Interior.ColorIndex = 3

I would like the user to be able to define the color themselves in the
spreadheet with a dropdown list.

Is there a way to transpose the code number for the chosen color to the
vba
code macro?

Can anyone help?
Thanks,

Roger