Bouton rapide / Trame mail via VBA sur Outlook

Bonjour à tous,

Je démarre doucement le codage VBA sur Outlook et suis confronté à un problème.

Je me suis créé une trame mail type avec un bouton rapide. Le but est que le bouton m'ouvre le mail, que j'y dépose un mail en pièce jointe et que je l'envoie.

Mon code m'ouvre le template et ça c'est nickel, le soucis que j'ai c'est que tant que l'email est ouvert je n'ai plus accès à Outlook derrière pour aller chercher le mail que je veux déposer en pièce jointe.

Peut-on contourner ce problème ou est-ce impossible ?

Voici mon code:

Option Explicit
Sub MakeTemplate()

'Déclaration des variables
Dim xDialog As FileDialog
Dim xExcel As Excel.Application
Dim xFilePath As String
Dim xNewItem As Object

xFilePath = CreateObject("WScript.Shell").SpecialFolders(5)
xFilePath = "Z:\Informatique\Commercial\Modèle - Révision Devis.msg"
Set xNewItem = Outlook.Application.CreateItemFromTemplate(xFilePath)
xNewItem.Display True
Set xNewItem = Nothing

End Sub

Je viens de résoudre mon problème cela venait de

xNewItem.Display True

J'ai simplement supprimé le True.

Rechercher des sujets similaires à "bouton rapide trame mail via vba outlook"