Repost: Userfrom Back Color
 

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

Repost: Userfrom Back Color
 

The backcolor of a userform could be any one of 16+ million colours, or are
you looking for system colours. If so search for examples with the
GetSysColor API.

Regards,
Peter T

"Abdul" wrote in message
ups.com...
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