Cell interior colors in XL2002 are limited to one of the 56-color
palette options.
If you try to use a color not in the palette it will just get mapped
(not sure exactly how) to the nearest match.

Tim


On Jan 12, 12:38*pm, Matthew Dyer wrote:
I'm trying to make a sheet that shows all the possible cell fill
colors available in Excel. I'm using Excel 2002, SP3. The code I made
is as follows -

Sub colors()
Dim i As String
i = 1
a = 1
Do Until a = 65536
Rows(a).Interior.Color = i
i = i + 10
a = a + 1
Loop
End Sub

I switched the i loop to go up by 10 because I wasn't getting any good
variety in colors, only red black and maroon. Even after switching to
intervals of 10 I'm still only getting reds yellows and greens along
with blacks... I know there should be some blues and purples. Anyone
have any ideas?