Note: The other languages of the website are Google-translated. Back to English
English English
  • Documents
  • Outlook
  • Comment obtenir la liste des informations des pièces jointes dans le courrier sélectionné dans Outlook?

Comment obtenir la liste des informations des pièces jointes dans le courrier sélectionné dans Outlook?

Pour les e-mails reçus joints avec des pièces jointes, vous pouvez parfois avoir besoin de connaître les informations détaillées des pièces jointes, telles que le nom d'affichage, le nom du fichier, etc. En fait, le code VBA peut vous aider à obtenir facilement la liste des informations des pièces jointes dans le courrier électronique sélectionné dans Outlook. Veuillez parcourir le didacticiel ci-dessous pour plus de détails.

Obtenir la liste des informations sur les pièces jointes dans le courrier sélectionné dans Outlook

Onglet Office - Activez la modification et la navigation par onglets dans Office et simplifiez considérablement le travail ...
Kutools for Outlook - apporte 100 fonctionnalités avancées puissantes à Microsoft Outlook
  • CC / BCC automatique par des règles lors de l'envoi d'e-mails; Transfert automatique Emails multiples par règles; Réponse automatique sans serveur d'échange, et plus de fonctionnalités automatiques ...
  • Avertissement BCC - afficher le message lorsque vous essayez de répondre à tous si votre adresse e-mail est dans la liste BCC; Rappeler en cas de pièces jointes manquantes, et plus de fonctionnalités de rappel ...
  • Répondre (à tous) avec toutes les pièces jointes dans la conversation par courrier; Répondre à plusieurs e-mails à la fois; Ajouter un message d'accueil automatique quand répondre; Ajout automatique de la date et de l'heure au sujet ...
  • Outils de fixation: Détacher automatiquement, Tout compresser, Tout renommer, Tout enregistrer automatiquement ... Rapport rapide, Compter les courriers sélectionnés, Supprimer les messages et contacts en double ...
  • Plus que
    100
    fonctionnalités avancées résoudre la plupart de vos problèmes dans Outlook
    2010-2019 et 365
    . Fonctionnalités complètes
    60
    -jour d'essai gratuit.

flèche bleue bulle droiteObtenir la liste des informations sur les pièces jointes dans le courrier sélectionné dans Outlook

1. Sélectionnez l'e-mail avec les pièces jointes dont vous souhaitez obtenir les informations.

2. appuie sur le autre + F11 touches sur le clavier pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

3. Double-cliquez ensuite sur le Project1 > Objet Microsoft Outlook > Cette session Outlook ouvrir le Projet1 - ThisOutlookSession la fenêtre. Voir la capture d'écran:

4. Puis copiez et collez le code VBA ci-dessous dans la fenêtre Project1 - ThisOutlookSession.

Code VBA: obtenir la liste des informations sur les pièces jointes

Option Explicit
Public Sub GetAttachmentList()
    Dim selItem As Object
    Dim aMail As MailItem
    Dim aAttach As attachment
    Dim Report As String
    
    For Each selItem In Application.ActiveExplorer.Selection
        If selItem.Class = olMail Then
            Set aMail = selItem
            For Each aAttach In aMail.Attachments
                Report = Report & vbCrLf & "------------------------------------------------------------------------" & vbCrLf
                Report = Report & GetAttachmentInfo(aAttach)
            Next
            Call CreateReportEmail("Attachment Report", Report)
        End If
    Next
End Sub
 
Public Function GetAttachmentInfo(attachment As attachment)
    Dim Report
    GetAttachmentInfo = ""
    Report = Report & "Index: " & attachment.Index & vbCrLf
    Report = Report & "Display Name: " & attachment.DisplayName & vbCrLf
    Report = Report & "File Name: " & attachment.FileName & vbCrLf
    Report = Report & "Block Level: " & attachment.BlockLevel & vbCrLf
    Report = Report & "Path Name: " & attachment.PathName & vbCrLf
    Report = Report & "Position: " & attachment.Position & vbCrLf
    Report = Report & "Size: " & attachment.Size & vbCrLf
    Report = Report & "Type: " & attachment.Type & vbCrLf
    
    GetAttachmentInfo = Report
End Function
Sub CreateReportEmail(Title As String, Report As String)
    Dim aMail As MailItem
    
    Set aMail = Application.CreateItem(olMailItem)
        
    aMail.Subject = Title
    aMail.Body = Report
    
    aMail.Display
End Sub 

5. presse F5 touche du clavier pour exécuter le code VBA.

6. Maintenant un Macros boîte de dialogue apparaît, veuillez cliquer sur le course .

7. Après avoir cliqué sur le course bouton dans le Macros boîte de dialogue, une nouvelle fenêtre de message sera créée avec toutes les informations sur les pièces jointes de l'e-mail sélectionné répertoriées dans le corps de l'e-mail. Voir la capture d'écran:

Notes: Ce code VBA peut être appliqué à Outlook 2007, 2010 et 2013


Kutools for Outlook - Apporte 100 fonctionnalités avancées à Outlook et simplifie grandement le travail!

  • CC / BCC automatique par des règles lors de l'envoi d'e-mails; Transfert automatique Emails multiples par coutume; Réponse automatique sans serveur d'échange, et plus de fonctionnalités automatiques ...
  • Avertissement BCC - afficher le message lorsque vous essayez de répondre à tous si votre adresse e-mail est dans la liste BCC; Rappeler en cas de pièces jointes manquantes, et plus de fonctionnalités de rappel ...
  • Répondre (à tous) avec toutes les pièces jointes dans la conversation par courrier électronique; Répondre à de nombreux e-mails en secondes; Ajouter un message d'accueil automatique quand répondre; Ajouter la date au sujet ...
  • Outils de pièces jointes: gérer toutes les pièces jointes dans tous les courriers, Détachement automatique, Compresser tout, Tout renommer, Tout enregistrer ... Rapport rapide, Compter les courriers sélectionnésplus
  • Courriels indésirables puissants par coutume; Supprimer les messages et contacts en doubleplus Vous permettre de faire plus intelligemment, plus rapidement et mieux dans Outlook.
tir kutools outlook onglet kutools 1180x121
tir kutools outlook kutools plus onglet 1180x121
 
Commentaires (2)
Pas encore de notes. Soyez le premier à évaluer!
Ce commentaire a été minimisé par le modérateur sur le site
Bonjour. pouvez-vous imaginer une possibilité pour récupérer/ouvrir une pièce jointe spécifique directement à partir de votre liste (par exemple un lien intégré). Merci d'avance Sandra
Ce commentaire a été minimisé par le modérateur sur le site
Salut - J'essaie de trouver un moyen de définir une réponse automatique qui répertorie toutes les pièces jointes qu'ils ont envoyées. Si cela peut inclure un index de fichiers pour les dossiers, ce serait également génial.


Fondamentalement - nous recevons des e-mails avec des soumissions de documents, j'ai déjà mis en place une réponse automatique pour les remercier de leur soumission, mais si cela pouvait maintenant inclure "les documents que vous avez soumis sont comme ci-dessous :... etc", cela aiderait massivement.


Si quelqu'un pouvait aider avec cela, ce serait génial! Merci!
Il n'y a pas encore de commentaires postés ici
Laisser vos commentaires
Publier en tant qu'invité
×
Évaluez cet article:
0   Personnages
Emplacements suggérés

Nous suivre

Copyright © 2009 - www.extendoffice.com. | Tous les droits sont réservés. Alimenté par ExtendOffice. | | Plan du site
Microsoft et le logo Office sont des marques commerciales ou des marques déposées de Microsoft Corporation aux États-Unis et / ou dans d'autres pays.
Protégé par Sectigo SSL