Pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter, inscrivez-vous gratuitement !

 

  1. #1
    Expert confirmé Avatar de Jon Shannow
    Homme Profil pro
    Responsable de service informatique
    Inscrit en
    avril 2011
    Messages
    2 674
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Responsable de service informatique
    Secteur : High Tech - Électronique et micro-électronique

    Informations forums :
    Inscription : avril 2011
    Messages : 2 674
    Points : 5 169
    Points
    5 169

    Par défaut Mais dans quel sous-dossier est ce mail ?

    Bonjour,

    Un des utilisateurs (et pas des moindre - c'est le Boss) me demande un truc sur lequel je sèche ...

    Il organise, dans OL 2010 ces mails en dossiers/sous-dossiers/sous-dossiers/etc... Une arborescence assez complexe.

    Quand il fait une recherche d'un mail, en étendant la recherche aux sous-dossiers, il retrouve bien le mail, mais il ne voit pas l'arborescence complète ce qui le gêne.

    Y a t-il un moyen qu'OL lui indique (d'une manière ou d'une autre) l'arborescence complète suite à une recherche ?

    Merci d'avance

    JS
    Au nom du pèze, du fisc et du St Estephe
    Au nom du fric, on baisse son froc...

  2. #2
    Expert confirmé
    Avatar de Oliv-
    Homme Profil pro
    solution provider
    Inscrit en
    mars 2006
    Messages
    3 404
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 47
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : solution provider

    Informations forums :
    Inscription : mars 2006
    Messages : 3 404
    Points : 5 919
    Points
    5 919
    Billets dans le blog
    16

    Par défaut

    Bonjour,
    Effectivement c'est un problème voici une macro qui fait le job

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Sub go_OU()
        If ActiveInspector.CurrentItem.Class = olMail Then
            Dim OITEM As Outlook.MailItem
            Set OITEM = ActiveInspector.CurrentItem
            MsgBox "Cet Email est classé dans " & vbCr & OITEM.Parent.FullFolderPath, vbOKOnly, "Où est -il classé ?"
            Set OITEM = Nothing
        End If
    End Sub

  3. #3
    Expert confirmé Avatar de Jon Shannow
    Homme Profil pro
    Responsable de service informatique
    Inscrit en
    avril 2011
    Messages
    2 674
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Responsable de service informatique
    Secteur : High Tech - Électronique et micro-électronique

    Informations forums :
    Inscription : avril 2011
    Messages : 2 674
    Points : 5 169
    Points
    5 169

    Par défaut

    Merci pour cette réponse,

    Il n'y aucun moyen qui ne passe pas par l'utilisation d'une macro ?

    JS
    Au nom du pèze, du fisc et du St Estephe
    Au nom du fric, on baisse son froc...

  4. #4
    Expert confirmé Avatar de Jon Shannow
    Homme Profil pro
    Responsable de service informatique
    Inscrit en
    avril 2011
    Messages
    2 674
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Responsable de service informatique
    Secteur : High Tech - Électronique et micro-électronique

    Informations forums :
    Inscription : avril 2011
    Messages : 2 674
    Points : 5 169
    Points
    5 169

    Par défaut

    Je ne suis pas super habitué des macros dans OL.

    J'utilise pour ma part OL2016, j'ai créé la macro que tu m'as fourni, mais elle ne fonctionne pas.

    J'ai un message étrange :
    Erreur d'execution : 91
    Variable objet ou variable de bloc With non définie

    Il s'arrête sur la première ligne !

    J'ai vérifié, c'est bien le même code que ce que tu as écris...

    JS
    Au nom du pèze, du fisc et du St Estephe
    Au nom du fric, on baisse son froc...

  5. #5
    Expert confirmé
    Avatar de Oliv-
    Homme Profil pro
    solution provider
    Inscrit en
    mars 2006
    Messages
    3 404
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 47
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : solution provider

    Informations forums :
    Inscription : mars 2006
    Messages : 3 404
    Points : 5 919
    Points
    5 919
    Billets dans le blog
    16

    Par défaut

    SAlut,
    essaye avec cette version

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    Private Sub go_OU()
        Dim obj As Object
        Dim OITEM As Outlook.MailItem
     
        Set obj = Application.ActiveWindow
        If TypeOf obj Is Outlook.Inspector Then
            Set obj = obj.CurrentItem
        Else
            Set obj = obj.Selection(1)
        End If
     
        If obj.Class = olMail Then
     
            Set OITEM = obj
            MsgBox "[" & OITEM.Subject & "]" & vbCr & "Cet Email est classé dans " & vbCr & OITEM.Parent.FullFolderPath, vbOKOnly, "Où est -il classé ? - OL_ADDIN_GS"
            Set OITEM = Nothing
        End If
     
    End Sub

  6. #6
    Membre habitué
    Profil pro
    Inscrit en
    septembre 2012
    Messages
    118
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : septembre 2012
    Messages : 118
    Points : 145
    Points
    145

    Par défaut

    Bonjour,

    Vive les macros, mais y'a pas que ça dans la vie.
    Il suffit de lancer une recherche sur la boite mail et de classer les résultats par dossier. Cela donne une première indication.
    Pour savoir où se trouve le dossier, c'est plus complexe et moins pratique, il faut aller dans les propriété du dossier du compte.
    La liste de tous les dossier apparait.

  7. #7
    Expert confirmé
    Avatar de Oliv-
    Homme Profil pro
    solution provider
    Inscrit en
    mars 2006
    Messages
    3 404
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 47
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : solution provider

    Informations forums :
    Inscription : mars 2006
    Messages : 3 404
    Points : 5 919
    Points
    5 919
    Billets dans le blog
    16

    Par défaut

    Salut
    Ta méthode ne répond pas vraiment à la question posée.
    Il organise, dans OL 2010 ces mails en dossiers/sous-dossiers/sous-dossiers/etc... Une arborescence assez complexe

Discussions similaires

  1. Réponses: 3
    Dernier message: 10/06/2015, 19h27
  2. [XL-2010] VBA exel - Rechercher un classeur dans un sous dossier dont le nom est inconnu
    Par rsuf91 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 15/12/2014, 14h10
  3. [OL-2007] déplacer un mail dans un sous dossier
    Par pepsister dans le forum VBA Outlook
    Réponses: 1
    Dernier message: 30/07/2014, 16h47
  4. Réponses: 2
    Dernier message: 11/01/2013, 12h05

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo