EXCEL 2013 - Pièce jointe envoyée avec CDO, altérée à réception Fermé

Question

Bonjour

J’ai fait une application (APP1) avec Excel 2013 avec laquelle j’envoie des mails avec pce jointe (PceJte1), en utilisant l’objet CDO.

Etant nul en VBA, je me suis basé sur le travail de « lermite222 » du 18/04/2013 ayant pour titre : « VB6 – VBA Envoi mail avec l’objet CDO »  (https://www.commentcamarche.net/faq/36411-vb6-vba-envoi-mail-avec-l-objet-cdo.
Cela fonctionne parfaitement.

Pour une nouvelle application (APP2, un fichier de remerciements (PceJte2) à envoyer à une liste de personnes), je me suis donc basé sur ce qui a déjà fonctionné c’est-à-dire sur ce que j’avais fait pour APP1.
Les mails sont bien envoyés mais les pièces jointes PceJte2 sont illisibles à réception.

J’inverse les pièces jointes entre APP1 et APP2 : la PceJte1 avec APP2 est illisible à réception et la PceJte2 envoyée avec APP1 est tout à fait lisible.

Conclusion : la qualité des pces jointes ne peut être mis en doute mais plutôt la macro de APP2 utilisant l’objet CDO.

Quand je compare les 2 macros de APP1 et APP2, je ne trouve pas de différence !
Quelqu’un peut-il me dire quelle partie du code pourrait être susceptible de contenir une erreur ?
(j'avais préparé un fichier à joindre à ma question, mais il semblerait que sur ce forum ce ne soit possible!)

D'avance merci pour l'aide
Cordialement

michel_m · Answer

bonjour 

(j'avais préparé un fichier à joindre à ma question, mais il semblerait que sur ce forum ce ne soit possible!) 

si, si !

Mettre le classeur sans données confidentielles en pièce jointe sur  https://mon-partage.frDans lien de téléchargement faire un clic  droit- copier l’adresse du lien   et  le coller dans votre message en cours sur ccm 

avec la pièce jointe, il faut mettre les 2 dans un "zip"

EXCEL 2013 - Pièce jointe envoyée avec CDO, altérée à réception

1 réponse

Discussions similaires