Color Pallet (XL97:SR2)

[jstevens]

Is it possible to exceed the standard 56 interior colorindex of a cell? I know you can modify/customize the color pallet but wanted to use code (see below) to visually see the color as well as it's index.

Sub ColorPallet()
For i = 1 To 56
ActiveCell.Offset(0, 1) = i
ActiveCell.Interior.ColorIndex = ActiveCell.Offset(0, 1)
ActiveCell.Offset(1, 0).Select
Next
End Sub


Thanks,
John

[HansV]

No, even in Excel 2002 it's still the same. In theory, you can use any RGB color by using ActibveCell.Interior.Color = RGB(i, j, k) where i, j and k are in the range 0 ... 255, but in practice these are all mapped to the palette colors.