Discussion :

[Gesphy]

Bonjour,
Je dispose d'un fichier Excel avec du code VBA qui calcule un QRCode et qui le dessine dans un shape.
Existe-t-il la même possibilité dans Access, soit de remplir une forme carrée par VBA avec des points ?
L'idée serait d'adapter le code Excel pour Access, mais je ne trouve pas cette correspondance d'un "shape" en Access.
Merci pour vos idées

[Jean-Philippe André]

Bonjour,

regarde si cette idée est utile dans ton cas ?

https://blog.developpez.com/philben/...access/qr_code

[Paraffine]

Bonjour Gesphy,

La solution proposée par Jean-Philippe André me parait tout à fait indiquée si tu utilises un web service.

Si ton code Excel génère un QRcode offline (et que tu veux garder ce fonctionnement), Access pourra difficilement "reprendre" le code VBA Excel et l'exécuter pour son compte; comme tu l'as noté, il n'a pas les mêmes collections...
Par contre, tu peux toujours piloter Excel depuis Access avec le mécanisme d'Automation pour obtenir la fameuse Shape en Excel, puis insérer le résultat dans un état Access.
Je n'ai pas vu de littérature pour inclure directement une Shape Excel dans un état ; mais si tu sais la convertir en image, tu la récupéreras sans trop de mal.

[Gesphy]

Bonjour Jean-Philippe et Paraffine,

Merci pour vos réponses.
J'avais déjà testé la solution de philben, mais cela n'est pas OK pour 2 raisons:
- j'aimerais rester "autonome" et ne pas dépendre d'un site ou d'une connexion internet.
- le QRCode généré par le site n'est pas lu par les applications bancaires en suisse. En effet c'est pour produire un Swiss-QRCode sur les nouveaux bulletins de versement. Les apps bancaires de lecture de ce QRCode sont très "sensibles". Par contre le QRCode produit par le code Excel est parfaitement lu.

Je suis effectivement actuellement en train de creuser l'idée de Paraffine de piloter Excel depuis Access. Je donnerai des nouvelles si j'y arrive.
Cordialement

[hyperion13]

Salut
A la volée j'ai trouvé
ceci et cela
Peut-être que ...

[Gesphy]

Merci pour vos idées et réponses.
Finalement j'ai trouvé une solution avec un Activex trouvé ici: https://github.com/Combinatix/QRCodeAX
Je l'avais déjà testé mais il me restait un problème de lecture avec les applications bancaires, mais cela fonctionnait très bien avec des lecteurs QR standard.

Après moults tests j'ai trouvé le bug, étrange d'ailleurs à mon avis: dans le SwissQRCode il y a beaucoup de retour à la ligne, et dans mon code j'avais utilisé chr(10) + chr(13), et c'est cela qui causait le bug. Il fallait inverser: chr(13) + chr(10), ou mieux utiliser la constante VbCrLf.

[Cem]

Bonjour,

L'active X suggéré (QRCodeAX.ocx) ne permet pas directement de générer un SwissQRcode me semble-t-il? Y aurait-il un autre ActiveX qui le permettrait?

Merci pour vos réponses
Cem

[Gesphy]

hello, j'ai pu l'utiliser en rajoutant le logo croix-suisse au milieu.
Sinon il existe des solutions payantes, par exemple chez: SmartTools

[pierrot77]

Bonjour,

je dois adapter un programme Access 2019 avec ce nouveau QR-Facture suisse. Cette association pour enfants ne facture qu'une fois par année un montant unique de fr 30.-

Pourrais-tu me conseiller pour intégrer ta solution ActiveX à Access car je ne l'ai jamais fait?

D'avance un grand MERCI

Meilleures salutations

hello, j'ai pu l'utiliser en rajoutant le logo croix-suisse au milieu.
Sinon il existe des solutions payantes, par exemple chez: SmartTools

[Gesphy]

Bonjour Pierrot,

Cela n'est pas une mince affaire, j'ai dû pas mal tatonner pour arriver à mes fins.
Dans ton cas (une facture annuelle de 30.-) ne serait-ce pas plus simple de donner un BV pré-imprimé de la banque ?
Ou bien acheter une licence chez SmartTools.de, c'est 150 euro et cela t'évitera bien des soucis !

Salutations

[loufab]

Bonjour,

J'ai développé une solution autonome pour une entreprise Suisse qui a une application Access de facturation. Ce n'est pas une mince affaire en effet, mais quand même beaucoup plus simple que le facture-X Européen.

Cordialement,