RGB Colors of "Fill Color"
Hi Bob,
I found the problem. I should have noticed it right away... bit of a brain
stall there.
Thanks,
Brad
"Bob Phillips" wrote:
Brad,
You could add a picker button on the form to call the built-in colour dialog
Function ReturnColorindex() As Long
Dim rngCurr As Range
Set rngCurr = Selection
Application.ScreenUpdating = False
Range("IV1").Select
Application.Dialogs(xlDialogPaÂ*tterns).Show
ReturnColorindex = ActiveCell.Interior.ColorIndex
ActiveCell.Interior.ColorIndex = xlColorIndexAutomatic
rngCurr.Select
End Function
--
HTH
Bob Phillips
"Brad" wrote in message
...
Thanks for taking the time to read my question.
I want to make a form on which the user can choose the fill color. I want
to have something that looks like what you find on the Formatting tool bar
for Fill Color. I thought I'd use option boxes inside a group. Instead
of
having a caption, I thought I'd just set the BackColor to the fill color
to
be used.
My problem is that when you drop down the BackColor list in the Properties
box, it doesn't give you many options Pallet or otherwise. I thought I
could
set the BackColor programatically, but I can't seem to find the RGB values
of
the available colors.
Thanks,
Brad
|