Transformer Photo de QR Code en tableau

dedef

XLDnaute Occasionnel
Bonjour,

Je voudrais savoir s'il est possible de transformer un QR code (.png ou .jpg) en un tableau excel, chaque "cellule" du QR Code correspondant à une cellule dans Excel. La transformation pourrait se faire en numérique ( 1 pour noir et 0 pour blanc), ou par remplissage noir/blanc des cellules.
Au final, par exemple, pour un Qr Code de dimension 29X29, mon tableau excel ferait également 29X29.
Je précise que le QR Code ne proviendrait pas d'une capture photographique, mais d'une création logicielle.

Merci d'avance.
 

pierrejean

XLDnaute Barbatruc
Re : Transformer Photo de QR Code en tableau

Bonjour dedef

Je pense que cela peut être possible non pas d’après le jpg (ou png) mais dans la phase logicielle aboutissant au jpg
 

dedef

XLDnaute Occasionnel
Re : Transformer Photo de QR Code en tableau

Bonjour,
Oui, certainement, mais mon problème, c'est que je ne suis pas l'auteur du QR Code : je n'ai que le fichier.
 

dedef

XLDnaute Occasionnel
Re : Transformer Photo de QR Code en tableau

Une petite précision supplémentaire : s'agissant d'une création logicielle, il serait possible de réduire la taille de l'image par éditeur photo pour avoir :
1 "cellule du QR Code" = 1 pixel

Voici le résultat
 

Fichiers joints

Dernière édition:

Modeste geedee

XLDnaute Barbatruc
Re : Transformer Photo de QR Code en tableau

Bonsour®
il me semble que le Qr code généré soit au format 25x25
qui est différent du format de l'image fournie (29x29) ????

l'épaisseur du cadre blanc entourant le QrCode est elle un multiple exact de la dimension d'un "pixel_Qr"???

Connaissant via VBA la dimension de l'image, on pourrait alors déduire la dimension d'un "pixel_Qr"
puis par balayage VBA de l'image au pas de cette dimension, et via une API on extraira alors la couleur de ce "pixel_Qr" pour colorer une cellule définie...
 

dedef

XLDnaute Occasionnel
Re : Transformer Photo de QR Code en tableau

Bonjour Modeste geedee,

Il s'agit bien d'un QR Code 25x25

Dans le premier fichier (297x297 pixels), il y a 9x9 pixels par cellule : la bordure blanche fait l'équivalent de 4 cellules.

Dans le second fichier j'ai supprimé la bordure et ai ramené l'échelle à 1 pixel par cellule : l'image ne fait donc plus que 25x25 pixels.
 

pierrejean

XLDnaute Barbatruc
Re : Transformer Photo de QR Code en tableau

Re

Un essai avec la complicité de Developpez.com et en suivant l'idée de Modeste Geedee
 

Fichiers joints

Modeste geedee

XLDnaute Barbatruc
Re : Transformer Photo de QR Code en tableau

Bonsour® PierreJean :rolleyes:

Oupssss !
Avec les fêtes j'avais oublié de donner suite ...

Dur.. Dur... !! de faire Ctrl D et Ctrl F aux bons endroits :(
ou bien est-ce dû aux pixels qui ne sont pas carrés sur mon poste ???
Capture.jpg
 

Fichiers joints

dedef

XLDnaute Occasionnel
Re : Transformer Photo de QR Code en tableau

Bonjour,

Merci pierrejean pour cette proposition.

Je viens de la tester, malheureusement, je n'arrive pas au même résultat. Comme le dit Modeste geedee, le pointage est délicat. J'ai essayé en agrandissant, mais le résultat obtenu reste aléatoire.

J'ai également essayé avec ma seconde image (1 pixel pour 1 cellule), mais là, l'image est très petite, et, en agrandissant, des niveaux de gris sont ajoutés par excel, ce qui dénature complètement le résultat.

Je mesure donc la difficulté d'obtenir une réponse à ma question.
 

pierrejean

XLDnaute Barbatruc
Re : Transformer Photo de QR Code en tableau

Re

Je vais tenter de trouver une meilleure façon de déterminer les paramètres
NB: pour le contrôle de fin (Ctrl f ) se tenir plutôt à l’extérieur du bas à droite
 

Efgé

XLDnaute Barbatruc
Re : Transformer Photo de QR Code en tableau

Bonjour dedef, Bonjour Modeste geedee
Mes respects pierrejean,

Bon, encore un miracle...
Merci pierrejean pour ce lien/adaptaion.
Chapeau bas une fois de plus.

Cordialement
 

pierrejean

XLDnaute Barbatruc
Re : Transformer Photo de QR Code en tableau

Re

Merci Efgé

Une version peut-être un peu plus fiable
NB: Je n'ai pas trop traité l'ergonomie . Toutes les suggestions seront les bienvenues
 

Fichiers joints

dedef

XLDnaute Occasionnel
Bonsoir,

Merci à PierreJean et toutes mes excuses, mais je n'avais pas vu sa dernière réponse qui date de ... 10 mois! Ceci étant, je suis toujours intéressé par la question, ..., et la solution.

Quand j'essaye de faire fonctionner la macro, j'ai un problème : le décodage affiche systématiquement des erreurs entre la ligne 10 et la ligne 12 (ajout notamment d'une ligne vierge) et la dernière ligne est fausse. Je n'arrive donc pas à reproduire exactement l'original, ce qu'avait pourtant réussi PierreJean.

Ceci étant ailleurs ça fonctionne.
 

Fichiers joints

pierrejean

XLDnaute Barbatruc
Re
Effectivement il y avait problème
Il est a priori corrigé en rectifiant la hauteur de l'image du Qrcode (tout est basé sur un Qrcode Carré)
Si encore souci ne pas hésiter à revenir
 

Fichiers joints

dedef

XLDnaute Occasionnel
Super, ça marche à merveille!

Je viens de faire également un essai avec un QRCode 29x29 : il n'y a qu'un paramètre à changer dans le code.
Je me suis quand même fait un peu "peur" car au début je n'y arrivais pas : il ne faut pas coller l'image, mais l'insérer.

Merci PierreJean pour ta disponibilité et ton savoir-faire.
 

dedef

XLDnaute Occasionnel
Bonjour,

Je relance le sujet, car, essayant d'utiliser cette macro sur une version 64 bits, j'obtiens une erreur de compilation :
"Le code contenu dans ce projet doit être mis à jour pour pouvoir être utilisé sur les systèmes 64 bits. Vérifiez et mettez à jour les instructions Declare, puis marquez les avec l'attribut PtrSafe ."

Je pense avoir trouvé comment modifier les lignes de déclaration, mais une "incompatibilité de type" apparaît maintenant pour GetDC.

Là, je n'ai pas trouvé comment corriger l'erreur.

Si quelqu'un peut m'aiguiller vers la solution ...

Merci d'avance.
 

Fichiers joints

Dranreb

XLDnaute Barbatruc
Bonsoir.
Essayez en changeant tous les LongPtr en Long.
Seules les expressions dédiées aux adresses ont de sérieuses raisons d'être en LongLong, et les handles Windows n'en sont pas, et les coordonnées X et Y d'une image non plus. Ni une couleur de pixel d'ailleurs.
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas