Lot's of examples about changing interior cell colors etc. to 5 or 3 or
whatever.
Where is the table of numbers from 1 to 56 that show what number relates to
what color. Been searching way too long. Thanks

Hi John,

One way:

Sub ColorTable()
Dim i As Integer
For i = 1 To 56
Activesheet.Range("A" & i).Value = i
Activesheet.Range("B" & i).Interior.ColorIndex = i
Next i
End Sub

---
Regards,
Norman



"JohnG" wrote in message
...
Lot's of examples about changing interior cell colors etc. to 5 or 3 or
whatever.
Where is the table of numbers from 1 to 56 that show what number relates
to what color. Been searching way too long. Thanks

Hi John

Run this macro

Sub ListColors()
Dim a As Long
For a = 1 To 56
Cells(a, 1).Interior.ColorIndex = a
Cells(a, 2).Value = a
Next a
End Sub


More info you can find here
http://www.mvps.org/dmcritchie/excel/colors.htm



--
Regards Ron de Bruin
http://www.rondebruin.nl


"JohnG" wrote in message ...
Lot's of examples about changing interior cell colors etc. to 5 or 3 or whatever.
Where is the table of numbers from 1 to 56 that show what number relates to what color. Been searching way too long. Thanks