long nombre ver s RGB

bonjour
quand on fait un source.backcolor (par exemple) on obtient un nombre du genre 9459964, comment convertir ce nombre en RGB ou HEX (rgb(252,84,144) ou #FC5890)?
merci

je me pose exactement la meme kestion !! qq'un pour nous aider ?



-------------------------------
Réponse au message :
-------------------------------

> bonjour
> quand on fait un source.backcolor (par exemple) on obtient un nombre du genre 9459964, comment convertir ce nombre en RGB ou HEX (rgb(252,84,144) ou #FC5890)?
> merci

C'est tout simple :

Public Function GetR(col As Long) As Byte
'pour le rouge
GetR = col And &HFF&
End Function

Public Function GetG(col As Long) As Byte
'Pour le vert
GetG = (col And &HFF00&) / &H100&
End Function

Public Function GetB(col As Long) As Byte
'Pour le bleu
GetB = (col And &HFF0000) / &H10000
End Function


F-L