Passer au contenu principal

Comment marquer automatiquement les messages supprimés comme lus dans Outlook?

Si vous supprimez un message électronique non lu dans Microsoft Outlook, le message sera déplacé vers le dossier Éléments supprimés et conservera l'état Non lu. Dans certains cas, les utilisateurs d'Outlook peuvent souhaiter marquer les messages supprimés comme lus automatiquement, dans le but d'exécuter des règles ou pour d'autres raisons. Ici, je vais présenter des méthodes pour marquer les messages supprimés comme lus dans Microsoft Outlook.

Marquer tous les éléments supprimés comme lus manuellement

Marquer automatiquement les messages de suppression comme lus avec VBA

Marquer automatiquement les éléments supprimés comme lus en un seul clic bonne idée3


Marquer tous les éléments supprimés comme lus manuellement

Dans Microsoft Outlook, les utilisateurs peuvent marquer l'ensemble du dossier de messagerie comme lu facilement, y compris le dossier Éléments supprimés.

Après avoir supprimé vos e-mails, sélectionnez le Les éléments supprimés dossier dans le volet de navigation, cliquez avec le bouton droit et sélectionnez le Tout marquer comme lu dans le menu contextuel. Voir la capture d'écran ci-dessous:



Marquer automatiquement les messages supprimés comme lus avec VBA

Cette section présentera une macro VBA qui marquera automatiquement tous les messages supprimés comme lus lors de la suppression.

Étape 1: appuyez sur le autre + F11 touches ensemble pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

Étape 2: développez le projet 1 dans la barre de gauche et double-cliquez sur le Cette session Outlook pour ouvrir une fenêtre vide.

Étape 3: collez le code VBA suivant dans la fenêtre vide.

VBA: marquer automatiquement les messages supprimés comme lus

Dim WithEvents g_OlkFolder As Outlook.Items
Private Sub Application_Quit()
Set g_OlkFolder = Nothing
End Sub
Private Sub Application_Startup()
Set g_OlkFolder = Session.GetDefaultFolder(olFolderDeletedItems).Items
End Sub
Private Sub g_OlkFolder_ItemAdd(ByVal Item As Object)
Item.UnRead = False
Item.Save
End Sub

Étape 4: Enregistrez la macro VBA et redémarrez votre Microsoft Outlook.

Remarque: Cette macro VBA ne fonctionne qu'avec Microsoft Outlook 2013, et cette macro VBA marquera uniquement les éléments supprimés comme lus qui se trouvent dans le fichier de données par défaut.

À partir de maintenant, lorsque vous supprimez des e-mails manuellement ou automatiquement avec des règles, les e-mails supprimés non lus seront marqués comme lus à la fois dans le dossier Éléments supprimés.


Marquer automatiquement les éléments supprimés comme lus en un seul clic

Si vous souhaitez marquer les éléments supprimés dans les sous-dossiers comme lus ou marquer automatiquement les éléments comme lus lors de leur suppression, comment pouvez-vous gérer le travail? Ici le Marquer la suppression comme lue utilité de Kutools for Outlook peut faire une faveur.

Installation gratuite Kutools for Outlook, puis procédez comme suit:

1. Cliquez Kutools onglet, puis sélectionnez une option selon vos besoins dans Marquer comme lu comme supprimé la liste déroulante.
marque doc supprimée comme lu 3

Activer la marque supprimée comme lue: pendant que vous activez cet utilitaire, les éléments seront automatiquement marqués comme lus lors de leur suppression.

Marquer les éléments supprimés comme lus: Marquez tous les éléments du dossier Éléments supprimés comme lus dans Outlook.

Inclure les sous-dossiers dans le dossier Éléments supprimés: Marquez tous les éléments du dossier Éléments supprimés et des sous-dossiers comme lus dans Outlook.

2. Une boîte de dialogue apparaît pour vous rappeler que l'opération est terminée après l'application de l'utilitaire, cliquez simplement sur Oui pour la fermer.
marque doc supprimée comme lu 4




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 (21)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
wow, it's amazing, especially the VBA code. It works very well.
This comment was minimized by the moderator on the site
wow,太棒了!尤其是这个VBA code。
This comment was minimized by the moderator on the site
Worked for outlook 2003 !
This comment was minimized by the moderator on the site
Note that you will also need to tick the Apply macro security to installed add-ins option to make it work on Outlook 2016.
This comment was minimized by the moderator on the site
Thanks for this - simple and effective.
This comment was minimized by the moderator on the site
My question is simple: WHY?!

Who thought keeping deleted messages unread was good for the user?!
This comment was minimized by the moderator on the site
I enabled Macros in the Trust Center and got it to work with Outlook 2016 as well. Thanks!
This comment was minimized by the moderator on the site
Yes, worked this way for me too in Outlook 2016.
This comment was minimized by the moderator on the site
EUREKA!!! IT WORKS!!!
This comment was minimized by the moderator on the site
I had the same issue as DUSTIN, ZOXDK, and GORDON... the macro wasn't working. The issue was that I had to enable macros in the Trust Center settings: Click File --> Options --> Trust Center --> Trust Center Settings --> Macro Settings Select "Notifications for all macros" You'll get a small popup whenever you open Outlook to Enable or Disable macros. As long as you click Enable, you should be good. Alternatively, you could set your Trust Center settings to automatically allow all macros, but that could present security concerns so I think the approach above is a good compromise since you'll only need to click "Enable Macros" when you launch Outlook.
This comment was minimized by the moderator on the site
Thanks! VBA code worked perfectly.
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