Thread: color index
View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Peter T[_3_] Peter T[_3_] is offline
external usenet poster
 
Posts: 81
Default color index

Hi Marina,

If you mean colour numbers 0 to 1677215 these can be
returned with a simple routine:

Sub CxToCvalue()
Dim i As Byte
For i = 1 To 56
Cells(i, 1).Interior.ColorIndex = i
Cells(i, 2) = i
Next
End Sub

There is no direct way to return any information about the
colour descriptions (eg Aqua) you see in the tooltips when
you hover over the palette. But you may find links in this
NG to code which includes "hardcoded" details relating to
the colour descriptions.

There are eight intuitively named "Color Constants", eg
MsgBox vbYellow, , vbRed

Also 0 to 15 colours with the "QBColor" function (does not
include Aqua!)

Regards,
Peter

-----Original Message-----

Does anyone know how I can find the color numbers in VB

Excel for the
color index. For example, for the color aqua?

Thanks.

Marina Madeleine


*** Sent via Developersdex http://www.developersdex.com

***
Don't just participate in USENET...get rewarded for it!
.