Bonjour à toutes et tous,
Je viens aujourd'hui vers vous car mon fichier excel contenant l macro fonctionnait et depuis quelques semaines, je n'arrive plus à l'utiliser comme je le faisais avant et je ne comprends pas pourquoi.
En effet, le but de mon code est de récupérer le mail ouvert et de le transférer avec un contenu supplémentaire dans le corps du mail, exactement comme si, manuellement, je prenais le mail, je le transférais et rajoutais mon texte et mes destinataires.
Voici la partie de mon code qui gère ce transfert et qui, je pense, ne fonctionne plus :
Si quelqu'un avait une idée e l'endroit qui peut pêcher ...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Private Sub Transfert_Click() Dim myinspector As Outlook.Inspector Dim ThisEmail As Outlook.MailItem Dim FwEmail As Outlook.MailItem Set myinspector = Outlook.ActiveInspector Set ThisEmail = myinspector.CurrentItem Set FwEmail = ThisEmail.Forward With FwEmail .Subject = "Tranfert automatique."
Merci à toutes et tous pour votre aide et le temps précieux que vous pourrez m'accorder
Cordialement,
Talzatior.
Partager