Colors
Hi Peter T
Thanks, thats great. Just knew it had to be simple.
Geoff
"Peter T" wrote:
Hi Geoff,
You need to coerce the Hex string to a value
frmcolor = Val(Sheets(1).Cells(i, 1).Value)
Be aware that in vba colours are read from Hex as BGR, not RGB as in html
#RRGGBB. However your sample colours correctly define pure black, white,
red, green & blue.
Regards,
Peter T
"Geoff" wrote in message
...
Hi
I have put the hex values of colors into Range("A1:A5").
&H0&
&HFFFFFF&
&HFF&
&HFF00&
&HFF0000&
How can i iterate through the range and use the hex value? The code below
fails with 'Mismatch'
Dim frm,frmcolor
For i =1 to 5
frmcolor = Sheets(1).Cells(i , 1).Value
frm.BackColor = frmcolor
Next
Appreciate any help.
T.I.A.
Geoff
|