[fr-users] Re: Correspondances couleurs Basic et autres

Bonjour,


Marie jo Libo wrote
> Bonjour,
>
> Dans une macro Ooo Basic sous calc, nous utilisons les couleurs du
> langage.
> Exemple : 603234
> Il ne s'agit ni de RVB, ni d'exa
> Je cherche désespérément une table des correspondances (pas trouvé non 
> plus sur les forum VBA)
>
> L'idée étant de permettre à l'utilisateur de paramétrer facilement ses 
> choix de couleurs et de connaître le code équivalent.
>
> Auriez vous des pistes ?
> Merci d'avance
>
> Marie-Jo

La valeur récupéré de la couleur est de type long.

Dim Couleur As Long
Dim Rouge As Integer, Vert As Integer, Bleu As Integer, Hexadecimal As
String

Couleur = 603234
Rouge = Red(couleur)
Vert = Green(couleur)
Bleu = Blue(couleur)
'te donne les valeurs RVB

Hexadecimal = "&H" & hex(couleur)
'te renvoie la valeur hexadécimale.

Gérard



--
View this message in context: 
http://nabble.documentfoundation.org/Correspondances-couleurs-Basic-et-autres-tp4131591p4131597.html
Sent from the Users mailing list archive at Nabble.com.

-- 
Envoyez un mail à users+unsubscribe@fr.libreoffice.org pour savoir comment vous désinscrire
Les archives de la liste sont disponibles à http://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne pourront pas être 
supprimés