j'essaye d'importer des informations qui proviennent de outlook
le problème est que je dois importer des infos qui viennent du folder coffre de outlook "EnterpriseVault"
J'ai mon code qui bug à la ligne ci-dessous
Set Folder = OutlookNamespace.GetDefaultFolder(olFolderEnterpriseVault).Folders("clientA"
je ne sais par quoi remplacé la partie du code GetDefaultFolder(olFolderEnterpriseVault) afin d'avoir accès au mail situé dans le folder EnterpriseVault
Pouvez vous m'aider?
Sub mai_from_excel()
Dim OutlookApp As Outlook.Application
Dim OutlookNamespace As Namespace
Dim Folder As MAPIFolder
Dim OutlookMail As Variant
Dim i As Integer
Set OutlookApp = New Outlook.Application
Set OutlookNamespace = OutlookApp.GetNamespace("MAPI")
Set Folder = OutlookNamespace.GetDefaultFolder(olFolderEnterpriseVault).Folders("clientA")