Comment ouvrir un dossier Outlook spécifique depuis Excel ?

Avez-vous déjà essayé d’ouvrir un dossier Outlook spécifique — comme la « Boîte de réception », les « Contacts » ou tout autre dossier — directement depuis un fichier Excel ? Dans cet article, je vous explique comment accéder au dossier Outlook de votre choix à partir d’un classeur Excel.

Ouvrir un dossier Outlook spécifique depuis un fichier Excel avec du code VBA

---

Ouvrir un dossier Outlook spécifique depuis un fichier Excel avec du code VBA

Le code VBA suivant vous permet d’ouvrir un dossier Outlook spécifique directement depuis une feuille de calcul Excel. Voici la marche à suivre :

1. Dans Excel, maintenez enfoncées les touches « Alt » + « F11 » pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez sur « Insertion » > « Module », puis collez la macro suivante dans la fenêtre du module.

Code VBA : Ouvrir un dossier Outlook spécifique depuis un fichier Excel :

Sub OpenOutlookFolder()
    Dim xOutlookApp As Outlook.Application
    Dim xNameSpace As Outlook.Namespace
    Dim xFolder As Outlook.Folder
    Dim xFolderType As OlDefaultFolders
    On Error Resume Next
    Set xOutlookApp = New Outlook.Application
    Set xNameSpace = xOutlookApp.Session
    Set xFolder = xNameSpace.GetDefaultFolder(olFolderInbox)
    xFolder.Display
    Set xFolder = Nothing
    Set xNameSpace = Nothing
    Set xOutlookApp = Nothing
    Exit Sub
End Sub

Remarque : dans le code ci-dessus, vous pouvez remplacer « Boîte de réception » dans la ligne « Set xFolder = xNameSpace.GetDefaultFolder(olFolderInbox) » par le nom de tout autre dossier que vous souhaitez ouvrir.

3. Ensuite, dans la fenêtre « Microsoft Visual Basic pour Applications », cliquez sur « Outils » > « Références », puis cochez l’option « Microsoft Outlook Object Library » dans la liste « Références disponibles » de la boîte de dialogue « Références – Projet1 » qui s’affiche. Voir capture d’écran :

4. Cliquez ensuite sur « OK » pour fermer la boîte de dialogue, puis appuyez sur la touche « F5 » pour exécuter ce code : le dossier Outlook spécifié s’ouvrira aussitôt.