Mise à jour code (32bits) pour utilisation 64 bits

Bonjour,
J’ai trouvé un fichier Excel qui est censé faire la conversion des valeurs couleurs long ou Hex en RGB ou inversement. Malheureusement ce fichier est ancien et prévu pour fonctionner sur un système 32 bits et a besoin d’une mise à jour pour fonctionner en 64 bits;
Mes connaissances en VBA (débutant) ne me permettent pas de le faire. Est-ce que quelqu’un pourrait me dépanner ?
Merci

 'GetCursorPos: renvoie la position de la souris sur l'écran.
Public Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
   'GetDC: Renvoie le Handle d'un Contexte d'Affichage hDC (Handle of Device Context)
Public Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long
   'GetPixel: renvoie la couleur du pixel en fonction des coordonnées spécifiées (X et Y)
Public Declare Function GetPixel Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, _
                    ByVal Y As Long) As Long


Palette_Couleurs_V01.xls (103 Ko)

Bonjour
Sur la base de sites internet consultés ton fichier adapté pour la version 64 bits
Plus aucun bug mais sans garantie que cela fonctionne
A toi de tester et me dire

Palette_Couleurs_V01.xls (140 Ko)

Sinon il existe un petit logiciel qui cela très bien
la boite à couleur

Capture d’écran 2023-07-20 172530

La boite à couleurs 1.6.15 fr

La Boîte à couleurs est un logiciel gratuit écrit pour Windows par Benjamin Chartier. Ce « gratuiciel » simple d’emploi vous permet d’obtenir et de modifier très simplement les codes d’une couleur dans les modèles suivants:

  • RVB (rouge / vert / bleu)
  • TLS (teinte / luminosité / saturation)
  • TSV (teinte / saturation / valeur)
  • CMJ (cyan / magenta / jaune)
  • CMJN (cyan / magenta / jaune / noir)

Parmi ses autres fonctions, la Boîte à couleurs vous permet la sélection d’une couleur visuellement, via 3 types de nuanciers, ou à l’écran en utilisant une pipette paramétrable.

De plus, le logiciel est fourni avec plusieurs fichiers de noms de couleurs (CHROMA, RGB, HTML et Pantone): vous pouvez alors obtenir le nom de la couleur la plus proche dans l’un de ces systèmes. Par exemple, vous choisissez le fichier Pantone, puis avec la pipette, vous cliquez une couleur à l’écran: le code Pantone le plus proche est automatiquement sélectionné.

Un nouveau fichier avec les couleurs RAL Classic est disponible (il se trouve dans l’archive avec le logiciel). Prenez le fichier « ral-classic.txt » et mettez-le dans le sous-répertoire « ColorNames » du logiciel la Boite à Couleurs. Vous aurez ainsi la possibilité d’obtenir le code RAL le plus approchant d’une couleur quelconque.
Rappel : Les autres fichiers de noms (Pantone, Html, Chroma, etc…) sont installés avec le logiciel.

Il est important de savoir que les équivalences entre couleurs RVB et codes Pantone ou RAL sont purement indicatives. Les deux systèmes étant des nuanciers papiers, on ne peut correctement les faire correspondre à des couleurs à l’écran.

Bonsoir,

Merci beaucoup ça fonctionne effectivement !
Et merci aussi pour « la boite à couleurs » je regarderai ça demain.

Bonjour
Merci pour ce retour
Ravi que cela te convienne
Au plaisir une prochaine fois

1 « J'aime »

Ce sujet a été automatiquement fermé après 30 jours. Aucune réponse n’est permise dorénavant.