Note: The other languages of the website are Google-translated. Back to English
English English

Comment déplacer le message électronique vers le dossier spécifié après la lecture dans Outlook?

Le déplacement du message électronique vers un dossier spécifié après la lecture est un meilleur moyen de garder le dossier Boîte de réception propre dans Outlook. Pour de nombreux utilisateurs d'Outlook, ils ont tendance à créer une règle pour le déplacement de ces e-mails lus. En fait, Outlook ne prend pas en charge ce processus d'assistant de règles. Dans cet article, nous allons vous montrer comment déplacer des messages électroniques vers un dossier spécifié après avoir lu avec le code VBA dans Outlook.

Déplacer le message électronique vers le dossier spécifié après la lecture 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 de 100 fonctionnalités avancées résoudre la plupart de vos problèmes dans Outlook 2010-2019 et 365. Fonctionnalités complètes Essai gratuit de 60 jours.

flèche bleue bulle droiteDéplacer le message électronique vers le dossier spécifié après la lecture dans Outlook

Vous pouvez déplacer les messages électroniques vers un dossier spécifié après avoir lu le code VBA en cours d'exécution dans Outlook.

1. Tout d'abord, vous devez créer un nouveau nom de dossier "Commenté»Dans le dossier Boîte de réception.

2. Ouvrez le dossier Boîte de réception, puis appuyez sur le autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

3. Puis double-cliquez pour développer Project1 > Objets Microsoft Outlook > Cette session Outlook ouvrir le VbaProject.OTM éditeur.

4. Ensuite, copiez et collez le code VBA ci-dessous dans l'éditeur VbaProject.OTM comme indiqué dans la capture d'écran ci-dessus.

Code VBA: déplacer les messages après lecture

Sub MoveInbox2Reviewed()
On Error Resume Next
Set oOutlook = CreateObject("Outlook.Application")
Set oNamespace = oOutlook.GetNamespace("MAPI")
Set oFolderSrc = oNamespace.GetDefaultFolder(olFolderInbox)
Set oFolderDst = oFolderSrc.Folders("Reviewed")
Set oFilteredItems = oFolderSrc.Items.Restrict("[UnRead] = False")
For Each oMessage In oFilteredItems
    oMessage.Move oFolderDst
Next
End Sub 

5. Puis cliquez sur le Enregistrer pour enregistrer le code VBA, puis fermez le Microsoft Visual Basic pour applications fenêtre.

6. Cliquez avec le bouton droit sur Barre d'outils d'accès rapideEt sélectionnez Personnaliser la barre d'outils Accès rapide dans le menu contextuel. Voir la capture d'écran:

7. dans le Options d'Outlook boîte de dialogue, vous devez:

1). Sélectionner Macros dans le Choisissez les commandes de la liste déroulante;

2). Sélectionner Projet 1. ThisOutlookSession dans la boîte sous le Choisissez les commandes de la liste déroulante;

3). Clique le Ajouter bouton;

4). Clique le OK .

8. Ensuite, vous pouvez voir le Macro bouton affiché dans le Barre d'outils d'accès rapide. Assurez-vous que vous recherchez dans le dossier de la boîte de réception à partir de laquelle vous souhaitez déplacer tous les messages lus, puis cliquez sur le bouton Macro pour exécuter le code VBA dans la boîte de réception.

Notes:

1. Ce code VBA peut être appliqué dans Outlook 2007, 2010 et 2013; Mais, dans Outlook 2007, vous pouvez directement cliquer sur le course bouton pour exécuter le code.

2. S'il existe plusieurs comptes de messagerie dans votre Outlook, le code VBA ne peut être appliqué qu'au compte dont le fichier de données est défini par défaut. Vous pouvez vérifier le fichier de données par défaut en cliquant sur Déposez le > Info > Paramètres > Paramètres ouvrir le Paramètres boite de dialogue. Ensuite, allez à la Fichier de données onglet, vous verrez que le fichier de données par défaut est marqué par avant.

3. Si vous souhaitez remplacer le fichier de données par défaut par un autre compte de messagerie, sélectionnez et mettez en surbrillance le compte que vous souhaitez définir par défaut, puis cliquez sur le bouton Définir par défaut dans le Paramètres boite de dialogue.

4. Lorsque vous exécutez le code VBA pour la première fois et que vous découvrez que les messages lus ne sont pas déplacés d'un seul coup, continuez à cliquer sur le bouton Macro jusqu'à ce que tous les messages lus de la boîte de réception soient déplacés.


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 (10)
Pas encore de notes. Soyez le premier à évaluer!
Ce commentaire a été minimisé par le modérateur sur le site
Ce code VBA peut-il être modifié pour déplacer des messages d'un sous-dossier de la boîte de réception vers un dossier "Révisé" dans ledit sous-dossier ?
Ce commentaire a été minimisé par le modérateur sur le site
J'ai essayé la méthode ci-dessus mais rien ne se passe. J'ai vérifié que le nom du dossier était exact et au bon endroit. J'ai également défini mon compte principal par défaut, d'où je déplacerai les messages lus. Je clique sur le bouton Macro... rien. Aider. Ai-je oublié quelque chose.
Ce commentaire a été minimisé par le modérateur sur le site
Il faut activer les références en VBA
Ce commentaire a été minimisé par le modérateur sur le site
Où sont tous les Dim ???????????????????/ o.0
Ce commentaire a été minimisé par le modérateur sur le site
Quelle ligne dois-je ajouter lorsque je souhaite que cette règle ne s'applique qu'aux e-mails dont l'objet contient un mot ou un texte ?
Ce commentaire a été minimisé par le modérateur sur le site
bonjour


Esiste la versione per Outlook 365 in italiano (non so se cambia qualcosa). Grazie
Ce commentaire a été minimisé par le modérateur sur le site
quelqu'un a-t-il eu cela qui n'a pas fonctionné la deuxième fois que vous avez essayé de l'appliquer?
Ce commentaire a été minimisé par le modérateur sur le site
J'ai utilisé ce code VBA, mais maintenant tous les e-mails déplacés vers "Examinés" ont disparu ? Des idées pourquoi?
Ce commentaire a été minimisé par le modérateur sur le site
Que se passe-t-il si vous souhaitez uniquement déplacer les messages lus non pas de la boîte de réception principale mais d'un sous-dossier de la boîte de réception vers le dossier "Révisé" ?
Ce commentaire a été minimisé par le modérateur sur le site
Que se passe-t-il si vous souhaitez uniquement déplacer les messages lus non pas de la boîte de réception principale mais d'un sous-dossier de la boîte de réception vers le dossier "Révisé" ?
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