[WD-2003] Ajout de pièces jointes avant envoi du mail

[korni184]

Bonjour,

J'ai créé une macro, qui s'exécute en appuyant sur un bouton sur word.

La macro retraite les données d'un formulaire et génère un email.

J'aimerai rajouter si possible une option, que dès, lorsque le mail est créé, une fenêtre pour ajouter une pièce jointe s'ouvre automatiquement. Et après le reste est manuel (choisir la pièce en attachement et l'adresse du destinataire et cliquer sur envoyer).

Mon script se termine comme ceci :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
 
Else
 
With lobjmail 
.subject = lstrSujet
.BodyFormat = olFormatHTML
.HTMLbody = LstrMsg
.Display
End with
'activedocuement.Close wdDoNotSaveChanges.
 
end if
 
 
Exit label :
Set lobjMail = Nothing
Set lobjOutlook = Nothing
Exit Sub

Pouvez vous m'aider à rajouter ce petit complément ?

Merci d'avance !!!

[Heureux-oli]

Salut,

Une pièce jointe est un objet attachment qui est "fourni" par une chaîne pour le chemin.