Passer au contenu principal

Comment télécharger / enregistrer automatiquement les pièces jointes d'Outlook dans un certain dossier?

Bien qu'il soit simple d'enregistrer toutes les pièces jointes d'un seul e-mail dans Outlook, utilisez le Pièces jointes > Enregistrer toutes les pièces jointes option, la gestion des pièces jointes de plusieurs e-mails, en particulier en grande quantité, peut s'avérer plus difficile. Cet article présente deux solutions efficaces pour télécharger automatiquement les pièces jointes des e-mails Outlook vers un dossier spécifique. Ces méthodes sont particulièrement utiles lorsqu'il s'agit de traiter de nombreux e-mails et pièces jointes, simplifiant le processus et permettant de gagner du temps.


Téléchargez automatiquement les pièces jointes Outlook dans un dossier avec VBA et une règle

Cette approche implique l'utilisation d'un script VBA qui, lorsqu'il est exécuté avec une règle spécifique, téléchargera et enregistrera automatiquement les pièces jointes des e-mails Outlook dans un dossier désigné. Veuillez procéder comme suit :

  1. Actualités Alt + F11 ouvrir le Microsoft Visual Basic pour applications fenêtre.
  2. Cliquez insérer > Module, puis collez le script VBA ci-dessous dans le fichier nouvellement ouvert Module fenêtre.

    VBA: Enregistrer automatiquement les pièces jointes Outlook dans un certain dossier

    Public Sub SaveAttachmentsToDisk(MItem As Outlook.MailItem)
    Dim oAttachment As Outlook.Attachment
    Dim sSaveFolder As String
    sSaveFolder = "C:\Users\DT168\Documents\outlook-attachments\"
    For Each oAttachment In MItem.Attachments
    oAttachment.SaveAsFile sSaveFolder & oAttachment.DisplayName
    Next
    End Sub

    Remarque: Veuillez localiser la ligne sSaveFolder = "C: \ Users \ DT168 \ Documents \ outlook-attachments \"et remplacez-le par le chemin du dossier de destination souhaité.

  3. Enregistrez le script VBA et fermez le Microsoft Visual Basic pour applications fenêtre.
  4. Allez à Courrier afficher, et cliquez sur Accueil > Règles > Gérer les règles et les alertes.
  5. Dans l'ouverture Règles et alertes boîte de dialogue, veuillez cliquer sur le Nouvelle règle bouton sur la Règles de messagerie languette.
  6. Dans le Assistant de règles boîte de dialogue qui apparaît, veuillez sélectionner le Appliquer la règle aux messages que je reçois option, et cliquez sur le Suivant .
  7. Dans le Assistant de règles (Quelle(s) condition(s) souhaitez-vous vérifier ?) boîte de dialogue, cliquez sur le Suivant sans sélectionner aucune option. Et puis cliquez sur le Oui bouton dans la fenêtre contextuelle Microsoft Outlook boite de dialogue.
  8. Dans ce qui suit Assistant de règles (Que voulez-vous faire avec le message ?) boîte de dialogue, procédez comme suit :
    1. Vérifiez la exécuter un script option. Conseil: Si vous ne voyez pas l'option, veuillez allez à ce tutoriel sur l'activation de l'option "exécuter un script" dans Outlook.
    2. Cliquez sur le texte « un script » souligné en bleu pour ouvrir le Sélectionnez un script boite de dialogue. Ici, choisissez le script que vous avez ajouté Étape 2 Et cliquez sur le OK .
    3. Cliquez Suivant bouton pour continuer.
  9. Dans le Assistant de règles (Y a-t-il des exceptions ?) boîte de dialogue, veuillez cliquer sur le Suivant bouton directement.
  10. À la fin Assistant de règles boîte de dialogue, veuillez nommer la règle dans le Étape 1 , cochez les options dont vous avez besoin dans le Étape 2 section, et cliquez sur Finition .
  11. Fermer la Règles et alertes boite de dialogue.

Résultat

Désormais, si vous avez sélectionné l'option « Exécuter cette règle maintenant sur les messages déjà dans la boîte de réception », toutes les pièces jointes de votre compte de messagerie seront téléchargées et stockées dans le dossier de destination spécifié. De plus, si vous avez coché l'option « Activer cette règle », toutes les pièces jointes des e-mails entrants seront automatiquement téléchargées et enregistrées dans le dossier désigné.


Téléchargez automatiquement les pièces jointes Outlook dans un dossier avec Kutools for Outlook

Avec Kutools for Outlook installé sur votre ordinateur, son Détachement automatique La fonction vous permet de télécharger automatiquement toutes les pièces jointes Outlook ou certaines pièces jointes spécifiques en fonction de vos conditions définies, en les dirigeant facilement vers un dossier choisi. De plus, cette fonctionnalité offre la possibilité de créer des sous-dossiers. Il propose deux alternatives pour nommer ces sous-dossiers : vous pouvez sélectionner l'un des formats, tels que [dossier de messages]-[objet du message], ou choisissez d'ajouter une chaîne de texte personnalisée comme suffixe au format choisi. Cette fonctionnalité améliore considérablement l’organisation et l’accessibilité de vos pièces jointes.

Kutools for Outlook: Boostez Outlook avec plus de 100 outils indispensables. Testez-le GRATUITEMENT pendant 60 jours, sans aucune condition !   Lire la suite...   Télécharger maintenant!

  1. Cliquez Kutools > Détachement automatique pour ouvrir la boîte de dialogue des fonctionnalités.
  2. Dans le Pièces jointes à détachement automatique dialogue, sélectionnez le Détacher automatiquement toutes les pièces jointes reçues option et configurez comme suit :
    1. Cliquez sur le bouton Parcourir pour spécifier le dossier de destination dans lequel enregistrer les pièces jointes automatiquement détachées.
    2. (Facultatif) Vérifiez le Détachez les pièces jointes dans le style ci-dessous option si vous souhaitez créer des sous-dossiers pour stocker les pièces jointes.
      • Créez des sous-dossiers dans le style ci-dessous: Nommez les sous-dossiers dans l'un des formats prédéfinis, comme [dossier de messages]-[objet du message].
      • Renommez les pièces jointes enregistrées dans le style ci-dessous: Nommez les sous-dossiers en utilisant l'un des formats prédéfinis et ajoutez une chaîne de texte personnalisée comme suffixe.
    3. (Facultatif) Vérifiez le L'icône de pièce jointe est toujours restée dans les e-mails option pour conserver un indicateur visuel dans les e-mails contenant des pièces jointes.
    4. Cliquez D'accord.

Résultat

À partir de maintenant, toutes les pièces jointes seront automatiquement enregistrées dans le dossier spécifié dès la réception des e-mails.

Conseil: Si vous souhaitez configurer le détachement automatique des pièces jointes en fonction de règles spécifiques, activez l'option Détacher automatiquement les pièces jointes par des règles option dans la Pièces jointes à détachement automatique dialogue. Après cela, cliquez sur le Nouveauté pour définir vos conditions de filtre et les paramètres de sauvegarde souhaités.

Notes:

  • Vous souhaitez accéder au Détachement automatique fonctionnalité? Télécharger Kutools for Outlook maintenant! Au-delà de cela, Kutools propose une myriade de plus de 100 autres fonctionnalités et propose un essai gratuit de 60 jours. N'attendez pas, essayez-le dès aujourd'hui !
  • Si vous souhaitez détacher ou télécharger les pièces jointes existantes de plusieurs/tous les e-mails reçus dans Outlook, appliquez Kutools for Outlook's Détacher tout (pièces jointes) or Enregistrer tout (pièces jointes) fonction.

Articles Liés:


Meilleurs outils de productivité bureautique

Kutools for Outlook - Plus de 100 fonctionnalités puissantes pour booster votre Outlook

🤖 Assistant de messagerie IA: E-mails professionnels instantanés avec la magie de l'IA : un clic pour des réponses géniales, un ton parfait, une maîtrise multilingue. Transformez l’emailing sans effort ! ...

📧 Email Automation: Absent du bureau (disponible pour POP et IMAP)  /  Programmer l'envoi d'e-mails  /  Auto CC/BCC par règles lors de l'envoi d'un e-mail  /  Transfert automatique (règles avancées)   /  Ajouter un message d'accueil automatique   /  Divisez automatiquement les e-mails multi-destinataires en messages individuels 

(I.e. Email Management: Rappel facile des e-mails  /  Bloquer les e-mails frauduleux par sujets et autres  /  Supprimer les e-mails en double  /  Recherche Avancée  /  Consolider les dossiers 

(I.e. Pièces jointes ProSauvegarde par lots  /  Détachement par lots  /  Compression par lots  /  Enregistrement automatique   /  Détachement automatique  /  Compression automatique 

???? Magie de l'interface: 😊Plus d'émojis jolis et cool   /  Boostez votre productivité Outlook avec des vues à onglets  /  Réduire Outlook au lieu de fermer 

???? Merveilles en un clic: Répondre à tous avec les pièces jointes entrantes  /   E-mails anti-hameçonnage  /  🕘Afficher le fuseau horaire de l'expéditeur 

👩🏼‍🤝‍👩🏻 Contacts et calendrier: Ajouter par lots des contacts à partir des e-mails sélectionnés  /  Diviser un groupe de contacts en groupes individuels  /  Supprimer les rappels d'anniversaire 

infos Caractéristiques 100 Attendez votre exploration ! Cliquez ici pour en savoir plus.

 

 

Comments (115)
Rated 4.5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
Thank you for this information
This comment was minimized by the moderator on the site
May i ask some question?

I usually received mail to many people and many kinds of files.
So i should distinguish each file.
But now, It can`t.

So Did you have any idea for this?
(like chacnged file name or and so on...)

Thank you for your help

BR
Hansu
This comment was minimized by the moderator on the site
Thank you for your great code
This comment was minimized by the moderator on the site
Hi,
I create Module in Microsoft VBA & save it
However when go to create Rules in Outlook, I can't see the select box of "Run a script"
What is the reason & how to fix it?
Thank you
This comment was minimized by the moderator on the site
Hi there,

In some versions of Outlook, especially in more recent updates, the "Run a Script" option might be disabled by default due to security concerns. To enable the "Run a Script" option in Outlook, you usually need to modify the registry settings. Here's a general guide on how to do it:

1. Close Outlook: Make sure Outlook is not running.
2. Open Registry Editor: Press Win + R, type regedit, and hit Enter.
3. Navigate to the Outlook Security Settings: Depending on your version of Outlook, you'll need to navigate to a specific path in the Registry Editor. For example, for Outlook 2016, 2019, and Microsoft 365, you might navigate to HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Outlook\Security.
4. Modify/Add the Registry Value:
4.1 Right-click in the right pane and choose New > DWORD (32-bit) Value.
4.2 Name the new value as EnableUnsafeClientMailRules.
4.3 Set its value to 1.
5. Close Registry Editor and restart your computer.
6. Open Outlook and check if the "Run a Script" option is available.
This comment was minimized by the moderator on the site
Ale kupa, oszuści. Maile zaczynają znikać. Nie mam moich wiadomości.
This comment was minimized by the moderator on the site
Hi, code works great however I am saving excel files and was wondering how I can modify the saved name. I recieve files like this "exa 2022-08.xlsx" how can I save the excel file as just "2022-08"?

this is my current code and my file saves however as just a file type not excel.

Public Sub PortlandDaily(MItem As Outlook.MailItem)
Dim oAttachment As Outlook.Attachment
Dim sSaveFolder As String
sSaveFolder = "T:\_Portland\Engineering Data\Daily Production Data\Test\"
For Each oAttachment In MItem.Attachments

Dim SplitName() As String
SplitName = Split(oAttachment.DisplayName, ".")

Dim RightName As String
RightName = Right(SplitName(0), 7)

Dim SaveName As String

SaveName = sSaveFolder & RightName

oAttachment.SaveAsFile sSaveFolder & oAttachment.DisplayName

Next
End Sub
Rated 4.5 out of 5
This comment was minimized by the moderator on the site
Hi there,

Please try the code below:
Public Sub PortlandDaily(MItem As Outlook.MailItem)
Dim oAttachment As Outlook.Attachment
Dim sSaveFolder As String
sSaveFolder = "T:\_Portland\Engineering Data\Daily Production Data\Test\"
For Each oAttachment In MItem.Attachments
  Dim SplitName() As String
  SplitName = Split(oAttachment.DisplayName, ".")
  Dim RightName As String
  RightName = Right(SplitName(0), 7) 'You can also declare the file name here, e.g., RightName = "2022-08"
  Dim SaveName As String
  SaveName = sSaveFolder & RightName & "." & SplitName(1)
  oAttachment.SaveAsFile SaveName
Next
End Sub


Amanda
This comment was minimized by the moderator on the site
Hi. is it possible to give the attachment file an entirely new name, using information form the mail (for example the date of delivery).
This comment was minimized by the moderator on the site
Hi,
How can I create a VBA to save attachment (Excel file) in my location drive when email received in my outlook folder and using the file name based on cell value...Many thanks

Regards,
Anthony On
This comment was minimized by the moderator on the site
Bonjour, j'ai réussi à rajouter "exécuter un script" dans les règles et faire fonctionner le script dans outlook. Les pièces jointes d'un mail bien précis s'enregistrent parfaitement dans le dossier demandé. Sauf que j'aimerais enregistrer uniquement les fichiers .txt, et non les .pdf qui s'incrémentent également. Aussi j'ai une autre requête s'il vous plaît, le script fonctionne très bien pour définir un dossier de destination, mais je souhaite définir d'autres règles qui me permettraient d'enregistrer les pièces jointes d'autres mails vers un autre dossier de destination. J'ai essayé de faire un 2e module VBA, cela ne fonctionne pas. J'ai généré un deuxième projet VBA mais Outlook n'en gère qu'un seul. Dans ce cas, comment remédier s'il vous plait ? Merci pour ce tuto très clair pour moi qui suis débutante.
This comment was minimized by the moderator on the site
Hi pearl,
Could you please send the code you generated so that we can fix it?
Amanda
This comment was minimized by the moderator on the site
Hi Can we  download the attachment contains specific letters using VBA code
This comment was minimized by the moderator on the site
Hi DAS,
When you said “the attachment contains specific letters”, did you mean you want to download the attachments from specific letters?
Amanda
This comment was minimized by the moderator on the site
Hi,
I executed the VBA + Rule option and it seemed to work perfectly. However, it recently stopped working with no errors. The rule is set to read the subject line, move to a certain folder if there is a certain subject, and then run the script. I know the trigger is working in the rule because the first action (move to folder) is working as it should.
Any idea why the rule trigger would work, but the documents are no longer being saved?
Things I have tried/checked:-The file path is correct-I added delays in various spots in the vba using application.wait-outlook has been shutdown and re-opened, and so has my laptop
(disclosure: I am a bit of a VBA newbie, but have beginner level coding knowledge)
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations