Save As d'un mail Outlook

[elokapo]

Bonjour,

Je voulais savoir quelle était la fonction après avoir créé un mail via macro Excel de pouvoir faire un save as de cet email vers un dossier bien spécifique sur mon drive ?

.Save permet de le sauver mais dans outlook

Est-ce que .SaveAsFile "c:\..." fonctionne-t-il ?

Merci par avance !
Elokapo

 

[elokapo]

Re : Save As d'un mail Outlook

Hello !

Je reviens sur ce sujet n'ayant toujours pas trouvé la fonction...

Set App = CreateObject("Outlook.Application")
Set Itm = App.CreateItem(0)
With Itm
.Subject = "sdfsd"
.To = "moi"
.SaveAs "\\chemin dacces\" & nom & ".msg"
End With
Set App = Nothing

Merci par avance pour votre aide.

Elokapo