Bonjour,
dans l'ancienne version 2010, j'avais une macro pour créer et attacher un fichier excel dans lotus note.
Ca marchait sans problème.
MAis voilà qu'arrive la version 2016.
Toute la macro fonctionne. Ça crée le mail, mais pas l'attachement.
J'ai beau chercher, je ne vois pas ce qui ne va pas. Et il n'y a pas de message d'erreur.
Avez vous une idée ?
Voici les lignes de codes que j'utilise pour attacher
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 Set doc = db.CREATEDOCUMENT() With doc .form = "Memo" .SendTo = adres .CopyTo = adres1 .Subject = Sujet .SAVEMESSAGEONSEND = True End With ' attachement du fichier recla attachement = nomsave Set AttachME = doc.CreateRichTextItem("attachement") Set EmbedObj = AttachME.EmbedObject(1454, "", attachement, "Attachment") Set Workspace = CreateObject("Notes.NotesUIWorkspace") Set notesUIDoc = Workspace.EditDocument(True, doc)
Partager