Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Mail Excel Avec Accuse Réception Confirmation De Lecture

La Vouivre

XLDnaute Occasionnel
Bonjour amis du forum

J’ai plusieurs codes de macros pour envoyer un mail avec Excel que j’ai découvert sur le Web
Sending mail from Excel with CDO
Les codes fonctionnent bien, mais, je recherche un code à ajouter aux macros pour avoir un accuse réception et un second pour une confirmation de lecture.
Ma config et Windows XP avec Excel 2003 et Outlook 2003
Merci à tous pour votre aide
 

La Vouivre

XLDnaute Occasionnel
Re : Mail Excel Avec Accuse Réception Confirmation De Lecture

J’ai esayer avec

ActiveDocument.ViewPropertyBrowser
ActiveDocument.ToggleFormsDesign

Mais un message d’erreur arrive « erreur de compilation » comment je peut faire
 

kiki29

XLDnaute Barbatruc
Re : Mail Excel Avec Accuse Réception Confirmation De Lecture

Salut, dans le lien que tu indiques regarde la rubrique Set importance/priority and request read receipt
 

La Vouivre

XLDnaute Occasionnel
Re : Mail Excel Avec Accuse Réception Confirmation De Lecture

J’ai aussi essayé avec



' Request read receipt
.Fields("urn:schemas:mailheader:return-receipt-to") = "ron@debruin.nl"
.Fields("urn:schemas:mailheader:disposition-notification-to") = ron@debruin.nl


Mais un message d’erreur arrive « erreur de compilation »
 

La Vouivre

XLDnaute Occasionnel
Re : Mail Excel Avec Accuse Réception Confirmation De Lecture

Comment mettre ces lignes de code dans la macro, sans que cela provoque Un message d’erreur arrive « erreur de compilation référence incorrecte ou non qualifie »


Set importance/priority and request read receipt

For importance/priority and read receipt you can add this in the With iMsg part of the macro before .Send

' Set importance or Priority to high
.Fields("urn:schemas:httpmail:importance") = 2
.Fields("urn:schemas:mailheader:X-Priority") = 1

' Request read receipt
.Fields("urn:schemas:mailheader:return-receipt-to") = "ron@debruin.nl"
.Fields("urn:schemas:mailheader:disposition-notification-to") = "ron@debruin.nl"

' Update fields
.Fields.Update
 

kiki29

XLDnaute Barbatruc
Re : Mail Excel Avec Accuse Réception Confirmation De Lecture

Salut, je viens de faire un test du code de ce lien et n'ai aucun message d'erreur et tout fonctionne correctement

pour le code à ajouter il suffit de lire dans le lien là ou je te l'ai indiqué
For importance/priority and read receipt you can add this in the With iMsg part of the macro before .Send

A mon avis ton code n'est pas exactement celui proposé
 
Dernière édition:

Discussions similaires

Réponses
2
Affichages
657
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…