Convertir des valeurs HEXA en valeur RVB

[kealkeal]

Bonjour,

Voici mon probleme :

J'ai un tableau avec 600 lignes.

Chaque cellule affiche un code couleur HEXA.

Ex :

cellule 1 : a7774b
cellule 2 : 4ba758

Je souhaite afficher 3 colonnes qui seront le résultat de la convertion de la couleur en HEXA vers leur valeur RVB correspondante.

Ex :

ligne 1 : a7774b valeur R : 167 valeur V : 119 valeur B : 75

Quelqu'un a une idée pour faire une macro qui me permettrait de convertir mes 600 lignes rapidement ?

Merci pour votre aide.

Michael BRICOUT

 

[mutzik]

Re : Convertir des valeurs HEXA en valeur RVB

bonjour,

ton chiffre en b4
=HEXDEC(GAUCHE($B4;2)) pour le premier
=HEXDEC(STXT($B4;3;2)) pour le milieu
=HEXDEC(DROITE($B4;2)) pour la partie de droite

 

[tototiti2008]

Re : Convertir des valeurs HEXA en valeur RVB

Bonjour kealkeal,

alors, j'avais fait un truc du genre dans un fichier
essaye de voir là :

Cijoint.fr - Service gratuit de dépôt de fichiers

c'est un tuto sur les combobox, et dans la partie Userform, il y a une boite de dialogue pour choisir les couleurs de fond
normalement, c'est basé sur des fonctions de conversion Décimal/Hexa/RVB que tu devrais trouver dans les modules

Edit : Bonjour mutzik

 

[kealkeal]

Re : Convertir des valeurs HEXA en valeur RVB

Merci mutzik !

Ta solution fonctionne parfaitement.

 

[pierrejean]

Re : Convertir des valeurs HEXA en valeur RVB

Bonjour kealkeal

Vois si cela te convient

Edit : encore a la bourre moi !!
Salut Mutzik
Salut Tototiti