Bonjour à tous

J'arrive à envoyer 1 mail avec une pièce jointe en mettant le chemin de la pièce jointe dans la variable attachement.

Comment faire si je veux enyoyer pluiseurs pièces jointes


'Prend en compte les pièces jointes
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
If attachment <> "" Then
        Set AttachME = MailDoc.CREATERICHTEXTITEM("Attachment")
        Set EmbedObj = AttachME.EMBEDOBJECT(1454, "", attachment, "Attachment")
    End If
Merci d'avance