Discussion :

[xcbilx]

Bonjour,

Je cherche à lister à partir d'une zone de liste déroulante sous Access mes dossiers et sous dossiers personnels présents dans outlook, afin de pouvoir détacher les messages et les pièces jointes.

je sais comment identifier et lister les dossiers par défaut d'outlook mais pas les perso

merci pour votre aide

[Oliv-]

Salut,
As tu essayé avec leur nom ?
voici 2 exemples

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Set NS = Application.GetNamespace("MAPI")
    Dim Dossier As MAPIFolder
    Set Dossier = NS.Folders("Dossiers personnels Olivier")

Au même niveau que Calandrier ou boite de reception:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Set Dossier = NS.GetDefaultFolder(olFolderCalendar).Parent.Folders("NF_contacts")

[xcbilx]

Merci Oliv pour tes indications, ça fonctionne. le seul bémol :il faut le nom du dossier perso

Mais c'est ok pour moi