Discussion :

[tibofo]

Bonjour,

J'ai une application tierce qui me génère un email (qui s'ouvre à la lecture écran avant de pouvoir l'envoyer) à un client avec une pièce jointe et un texte.

Malheureusement, ce texte ne me convient pas.

Savez-vous s'il est possible de remplacer tout ce texte par un autre automatiquement ?

Je cherche une solution du style :

si textetrouvé = "Veuillez trouver ci-joint votre document"
Alors
supprimer tout le texte
écrire "Voici le document scanné"


P.S. : je n'ai jamais fait de vba sous outlook.... Please soyez indulgent

Merci par avance
Thibault

[Jean-Philippe André]

Salut,

pour arriver a tes fins, il va te falloir apprendre quelques rudiments de VBA.

Le code pourra etre lance lors de l'envoi grace a l'evenement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
 
End Sub

un peu de lecture pour la suite :
http://dolphy35.developpez.com/article/outlook/vba/

[tibofo]

Merci beaucoup Jean-Phillipe pour cette piste.

J'utilise un peu le vba access et excel. Mais j'ignore tout des méthodes, objets d'outlook.
Je vais chercher

Bonne soirée.
Thibault

[tibofo]

J'ai lu, cherché et j'ai appliquer ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Public Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Item.Body = Replace(Item.Body, "texte à changer", "texte changé")
MsgBox "Envoi d'un mail"
End Sub

Mais j'ai un pb de fonctionnement :
- si je crée manuellement un nouvel email et l'envoi : le code fonctionne

- mais si mon application tierce crée le mail outlook (en aperçu avant envoi) : cela ne se déclenche pas

J'ai remarqué que manuellement mon mail est en format html mais l'application tierce, elle, le fait en mode Texte brut


Auriez-vous une solution ?

Merci
Thibault

[Oliv-]

Bonjour,
Les événements comme Application_ItemSend ne fonctionnent pas dans ce mode d'envoi qui est identique à l'option "envoyer vers destinataire".

Soit il faut créer un complèment .com
https://www.developpez.net/forums/bl...dll-com-addin/

Soit il faut cliquer sur enregistrer lorsque le mail apparaît, fermer la fenêtre, le réouvrir à partir des brouillons, l'envoyer et là l'événement se déclenchera.

[tibofo]

Merci beaucoup à vous 2 pour m'avoir répondu.