Hello SuitedAces,

The pallet is arranged by color not by color index values.

Here is a macro that will change the active cell's background color
according to the color index sequentially. It places the color index in
the cell to the right. You can comment this line out if you like.


Code:
--------------------

Sub ChangeColor()

Dim N As Integer
Static CI As Integer

CI = CI + 1
With ActiveCell
N = CI Mod 57
.Interior.ColorIndex = N
.Offset(0, 1).Value = N
End With

End Sub

--------------------


Sincerely,
Leith Ross


--
Leith Ross
------------------------------------------------------------------------
Leith Ross's Profile: http://www.excelforum.com/member.php...o&userid=18465
View this thread: http://www.excelforum.com/showthread...hreadid=557183