1. #1
    Membre à l'essai
    Femme Profil pro
    Étudiant
    Inscrit en
    avril 2017
    Messages
    21
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 24
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Finance

    Informations forums :
    Inscription : avril 2017
    Messages : 21
    Points : 16
    Points
    16

    Par défaut macro vba: joindre une PJ dans mail provenant d'un autre mail

    Bonjour,

    Voilà je souhaite automatiser un mail outlook (j'ai réussi cette partie là j'ai l'habitude) mais pb vient du fait que j'ai besoin de joindre à ce mail une PJ qui se trouve dans un mail présent dans ma boite mail outlook. Je souhaitons savoir comment mettre en place une macro qui soit trouve la PJ dans le mail et le met dans mon nouveau, ou simplement une macro qui enregistre la pj dans un dossier.

    Merci d'avance.8

  2. #2
    Expert éminent

    Homme Profil pro
    Curieux
    Inscrit en
    juillet 2012
    Messages
    4 395
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Curieux
    Secteur : Arts - Culture

    Informations forums :
    Inscription : juillet 2012
    Messages : 4 395
    Points : 8 404
    Points
    8 404
    Billets dans le blog
    5

    Par défaut

    Bonjour,

    un exemple illustré à complètement adapter à ton cas, et sécuriser si besoin

    il faut enregistrer le fichier sur ton PC pour ensuite l'attacher à un mail

    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
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    Sub erre()
    Dim MonMail As MailItem, MaPj As Attachment, MonChemin As String
     
    ' le mail contenant la PJ
    ' pour l'exemple, je prend le premier mail de la selection active
    Set MonMail = ActiveExplorer.Selection.item(1)
     
    ' si le mail contient des PJ
    If MonMail.Attachments.Count > 0 Then
        ' on prend la première PJ (à adapter !)
        Set MaPj = MonMail.Attachments(1)
     
        ' on construit le chemin d'enregistrement
        MonChemin = "C:\....." & MaPj.FileName
     
        ' on enregistre la PJ
        MaPj.SaveAsFile MonChemin
     
        ' on crée un nouveau mail
        ' Remplacer Application par la variable Objet représentant ton instance Outlook !
        With Application.CreateItem(olMailItem)
            ' on attache la PJ
            .Attachments.Add MonChemin
     
            ' toujours enregistrer par précaution le mail après ajout d'une PJ
            .Save
     
            ' on affiche le mail
            .Display
        End With
     
        ' on supprime la PJ enregistrée temporairement
        Kill MonChemin
    Else
        MsgBox "Aucune PJ dans ce mail !"
    End If
     
    End Sub
    Attention, rédigé en liaison précoce, si tu travailles en liaison tardive il faudra déclarer tes variable Objet "As Object" et remplacer la constante OlMailItem par le chiffre 0

  3. #3
    Membre expert
    Avatar de dysorthographie
    Homme Profil pro
    Ingénieur développement logiciels
    Inscrit en
    septembre 2016
    Messages
    2 083
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Charente Maritime (Poitou Charente)

    Informations professionnelles :
    Activité : Ingénieur développement logiciels
    Secteur : Industrie

    Informations forums :
    Inscription : septembre 2016
    Messages : 2 083
    Points : 3 547
    Points
    3 547
    Billets dans le blog
    1

    Par défaut

    Bonsoir,
    Je n'ai regardé mais il.doit être possible de transférer le mail en changeant ce qu'il faut la pièce jointe y reste!

    De toutes les façon la.pièce jointe est encapsule dans le mail en base64!

    Il.est peut-être,mais là je spécule encore plus, de passer la.pièce jointe directement à un niveau mail!
    Il dit non avec la tête
    mais il dit oui avec le coeur
    il dit oui à ce qu’il aime
    il dit non au professeur {Jacques PRÉVERT}

  4. #4
    Expert éminent

    Homme Profil pro
    Curieux
    Inscrit en
    juillet 2012
    Messages
    4 395
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Curieux
    Secteur : Arts - Culture

    Informations forums :
    Inscription : juillet 2012
    Messages : 4 395
    Points : 8 404
    Points
    8 404
    Billets dans le blog
    5

    Par défaut

    En soit l'idée de recycler une copie du mail en modifiant les Objets/Corps/Recipents est pas mauvaise oui

    Cependant, du point de vue des en-têtes du mail, c'est une autre histoire, puisqu'on va alimenter/reprendre (notamment) le Thread-Topic et Thread-Index du mail initial

    C'est pour ça que je préfère repartir d'un mail vierge

  5. #5
    Membre expert
    Avatar de dysorthographie
    Homme Profil pro
    Ingénieur développement logiciels
    Inscrit en
    septembre 2016
    Messages
    2 083
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Charente Maritime (Poitou Charente)

    Informations professionnelles :
    Activité : Ingénieur développement logiciels
    Secteur : Industrie

    Informations forums :
    Inscription : septembre 2016
    Messages : 2 083
    Points : 3 547
    Points
    3 547
    Billets dans le blog
    1

    Par défaut

    Bonjour joe,

    Je te fais confiance j'ai balancé une idée mais ta réponse tient la route.
    Il dit non avec la tête
    mais il dit oui avec le coeur
    il dit oui à ce qu’il aime
    il dit non au professeur {Jacques PRÉVERT}

  6. #6
    Membre à l'essai
    Femme Profil pro
    Étudiant
    Inscrit en
    avril 2017
    Messages
    21
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 24
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Finance

    Informations forums :
    Inscription : avril 2017
    Messages : 21
    Points : 16
    Points
    16

    Par défaut

    merci pour le code, je dois faire des motifications sur la pj à enrengistrer et joindre le mail, faut il d'abbord l'enrengistrer puis faire les modifications, ou l'ouvrir faire le modifications puis l'enrengistrer

    merci d'avance

  7. #7
    Expert éminent

    Homme Profil pro
    Curieux
    Inscrit en
    juillet 2012
    Messages
    4 395
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Curieux
    Secteur : Arts - Culture

    Informations forums :
    Inscription : juillet 2012
    Messages : 4 395
    Points : 8 404
    Points
    8 404
    Billets dans le blog
    5

    Par défaut

    Bonjour,

    quel est le type de fichier ? Quelles sont les modifications à apporter ?

    Si c'est du fichier Excel (voir word) il est possible d'automatiser les modifications avant de l'attacher au nouveau mail

    Mais il faut dans ce cas là expliquer un peu les choses

  8. #8
    Membre à l'essai
    Femme Profil pro
    Étudiant
    Inscrit en
    avril 2017
    Messages
    21
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 24
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Finance

    Informations forums :
    Inscription : avril 2017
    Messages : 21
    Points : 16
    Points
    16

    Par défaut

    En effet c'est un fichier excel il y a juste un rajout de collone qui sont a remplir, une fois que le code a réussir à ouvrir la Pj cette partie la c'est bon pour moi. Je souhaitais juste savoir comment ouvrir la pj la modifier et l'enrengistrer

  9. #9
    Membre à l'essai
    Femme Profil pro
    Étudiant
    Inscrit en
    avril 2017
    Messages
    21
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 24
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Finance

    Informations forums :
    Inscription : avril 2017
    Messages : 21
    Points : 16
    Points
    16

    Par défaut

    Bonjour,

    J'ai une dernière question, je souhaitais savoir comment choisir la boite mail qui sera parcouru j'en ai deux et j'aimerais qu'une ne parcours qu'une seule sur les deux merci d'avance

Discussions similaires

  1. [AC-2010] Ajouter une pièce Jointe
    Par Pittouti dans le forum VBA Access
    Réponses: 2
    Dernier message: 16/03/2016, 14h36
  2. [AC-2010] Ajouter une pièce jointe à un enregistrement
    Par mafooley dans le forum Requêtes et SQL.
    Réponses: 4
    Dernier message: 28/08/2015, 08h30
  3. Réponses: 10
    Dernier message: 11/03/2013, 09h23
  4. [SP-2010] Ajouter une pièce jointe à un élément de liste dans SharePoint 2010
    Par dhiaeddine2012 dans le forum SharePoint
    Réponses: 0
    Dernier message: 05/12/2012, 14h56
  5. VBA : ajouter une valeur dans une liste déroulante
    Par remi59 dans le forum Access
    Réponses: 4
    Dernier message: 22/12/2005, 10h01

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