I found the follwing to get the interior color of a cell

How I could get ALL the POSSIBLE Back Color of a userfrom the same way?



Sub ListColorIndexes()
Dim Ndx As Integer

For Ndx = 1 To 56
Cells(Ndx, 1).Interior.ColorIndex = Ndx
Cells(Ndx, 2).Value = Ndx
Next Ndx
End Sub

Thanks