Choix du calendrier en VB

Bonjour,

Quand je déclare les lignes suivantes, je pointe vers le calendrier par défaut.
Ma question est : Comment faire pour pointer sur autre calendrier Outlook qui s'appellerait par exemple TESTCALENDAR.

Code:

---

1 2 3

Set objApply = Outlook.Application Set objNameSpace = objApply.GetNamespace("MAPI") Set objFolder = objNameSpace.GetDefaultFolder(olFolderCalendar)

---

Merci d'avance de vos réponse.

Blonblon62