Discussion :

[vincent.lallement]

Bonjour,

Je fait une macro dans Outlook.
Le but est d'aller alimenter un logiciel de CRM avec des mails.
J'ai absolument besoin de savoir dans ma macro, si le mail que j'envoie au CRM est un élément RECU ou ENVOYE

Voici le bout de code, et je n'arrive pas à récupérer le dossier

Merci beaucoup

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
    ' A lancer si message non ouvert
    Dim MonOutlook As Outlook.Application
    Dim LeMail As Object
    Dim LesMails As Outlook.Selection
    Set MonOutlook = Outlook.Application
 
    Set LesMails = MonOutlook.ActiveExplorer.Selection
 
    For Each LeMail In LesMails
        sav_mail_as_msg LeMail
    Next LeMail
 
    Set LesMails = Nothing

[carden752]

Bonjour,

La propriété FullFolderPath de l'objet .Parent (accès au dossier de l'item sélectionné) devrait correspondre à ton besoin.

Code :

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

LeMail.parent.fullfolderpath

[vincent.lallement]

En fait, j'ai pris ton exemple, mais pour de simplicité je me suis rabattu ensuite vers

Code :

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

        LeDossier = MonOutlook.ActiveExplorer.CurrentFolder.Name