1. enter this tiny macro:

Sub Macro1()
MsgBox (Selection.Interior.ColorIndex)
End Sub

2. set the background color of any cell to any color and select that cell

3. run the macro to get the number

So if you set a cell t light orange, you would see 45
--
Gary''s Student


"tandavina" wrote:

>
> How/Where do I get the color index?
> I used the names of the colors:
>
>
> Code:
> --------------------
> For i = 1 To grpnr
> Select Case D1(i)
> Case Cells.Interior("Light Orange")
> grpsize(i) = 6
> Case Cells.Interior("Aqua")
> grpsize(i) = 4
> Case Cells.Interior("Plum")
> grpsize(i) = 3
> Case Cells.Interior("Rose")
> grpsize(i) = 2
> Case Else
> MsgBox "error in grouping color"
> End Select
> Next i
> --------------------
>
>
> only to return error.
>
>
> --
> tandavina
> ------------------------------------------------------------------------
> tandavina's Profile: http://www.excelforum.com/member.php...o&userid=30334
> View this thread: http://www.excelforum.com/showthread...hreadid=511457
>
>