[Toutes versions] Connaitre le type d'un Folder

[jims34]

Bonjour,

est-ce que VBA outlook contient une propriété ou une méthode qui permet de connaitre le type d'un dossier (contacts, mail, calendrier, etc.). J'ai cherché dans la classe Folder mais je n'ai rien trouvé.

Merci d'avance,

Jean-Michel

[jims34]

Bon, j'ai essayé de tester le type des items contenus dans un dossier mais apparemment ça ne fonctionne pas :

Code :

1
2
3
4
5
For Each Folder In folders
          If Folder.DefaultItemType = olAppointmentItem Then
          Debug.Print (Folder.FolderPath)
      End If
Next

Pourquoi ce code ne me retourne rien ? Pourtant j'ai des calendriers dans mon outlook...

[carden752]

Bonjour,

Je regarderai plutôt sur ces propriétés.

Code :

1
2
3
4
5
6
7
8
For Each folder In Outlook.Application.ActiveExplorer.Session.Folders.Item(1).Folders
 If Folder.DefaultItemType = olAppointmentItem Then
          Debug.Print (Folder.FolderPath)
      End If
 
Next
 
Attention, il me semble que la valeur retournée par DefaultItemType n'est pas un texte mais un code (tel que 0,1,2...).

[jims34]

Merci Christophe,

ça fonctionne. C'était dans mon code qu'il y avait une erreur.
Ça fonctionne avec des calendriers partagés avec le serveur public SharedFolders. Avec le serveur Exchange je n'ai que mes dossiers personnels.

Si quelqu'un soit comment on peux sélectionner les calendriers d'autres utilisateurs partagés sur serveur Exchange je lui en serai éternellement reconnaissant !

Merci d'avance,

Jean-Michel