Bonjour,

J'utilise une macro sous excel pour envoyer des mails via LOTUS. Savez vous :

1) comment ajouter un accusé de réception?
J'ai ceci dans ma macro mais ca ne fonctionne pas :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
MailDoc.AppendItemValue "ReturnReceipt", "1"
Essayé également de remplacer "1" par True, idem

2) comment ajouter sa signature (car les mails partent bien, mais il n'y a pas ma signature)

3) Est il possible de saisir le corps du mail dans une cellule lotus ? Car pour le moment il faut saisir le mail dans la macro, ce qui n'est franchement pas pratique pour l'utilisateur
Extrait de ma macro :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Dim objNotesField As Object

....

Set objNotesField = MailDoc.CreateRichTextItem("Body")
        With objNotesField
            .AppendText "Bonjour" & Prenom
            .AddNewLine 2
            .AppendText "*************************************************************************************************"
            .AddNewLine 2
            .AppendText "Ce message a été envoyé avec le fichier que j'ai joint."
            .AddNewLine 2
            .AppendText "Le fichier Envoi mail par Lotus du : " & Date & " à " & Time
            .AddNewLine 2
            .AppendText "est en pièce jointe"
            .AddNewLine 2
            .AppendText "--------------------------------------------------------------------------------------------------"
            .AddNewLine 2
            .AppendText "Cet e-mail a été généré par un processus automatique."
            .AddNewLine 2
            .AppendText "Cordialement"
            .AddNewLine 1
            .AppendText "ABIVEN"
            .AddNewLine 1
            .AppendText "tel :"
            .AddNewLine 1

        End With