IndicatorColorIndex Property

  • Thread starter Thread starter Leonard
  • Start date Start date
L

Leonard

I have a custom toolbar button that sets color to a cell.
I am assigning a color index # in my code, referencing
the "IndicatorColorIndex". It seems almost a forth of the
color selections are gray... is this normal?
Is there a way of adding additional colors?

Thank you for your quick response on a prvious question.
I had responed with a thank you which you deleted. Is it
inappropriate for extraneous responses to be posted, even
if they are benign? If so I apologize, it won't happen
again.

Leonard
 
Leonard,

I'm not sure what your question is. The IndicatorColorIndex
property applies only to the ErrorCheckingOptions object. What
color selections are gray? Perhaps you could provide a few more
details about what you are trying to do, and include some sample
code.
I had responed with a thank you which you deleted. Is it
inappropriate for extraneous responses to be posted, even
if they are benign?
Click to expand...

No one deletes posts. I can see your follow-up thank-you post. And
yes, it is entirely fine to post thank-you posts. In fact, it
should be encouraged.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com (e-mail address removed)
 
My first response was there and then it was gone now it's
there.
It must be something with my system, eyes, monitor etc.
sorry about that.

=====================================================
This is the I use to apply shading to cells by asigning it
to a custom button on a toolbar. The selection of colors
as shown in the help system as represented
by "Selection.Interior.ColorIndex = 48", doesn't
corrospond to the colors on the screen. I had to try each
number from 1 to 56 to see what the colors are.
On my system the number 48 relates to a light gray while
the number 2 relates to white.
What am I doing wrong?

==================================================
Sub MyLightShade()

If Selection.Interior.ColorIndex = 48 Then
With Selection.Interior
.ColorIndex = 2
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With
Else: Selection.Interior.ColorIndex = 2
With Selection.Interior
.ColorIndex = 48
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With
End If

End Sub
=====================================================
 
Back
Top