How to delete unseen outlook mails
To delete unseen Outlook emails, you can follow these steps:
Method 1: Using the "Mark as Read" feature
- Open Outlook and navigate to the folder containing the unseen emails (e.g., Inbox, Junk Email, etc.).
- Select the first unseen email by clicking on it.
- Press the "Ctrl+A" keys to select all unseen emails.
- Right-click on the selected emails and choose "Mark as Read" from the context menu.
- Confirm that you want to mark all selected emails as read by clicking "OK" in the prompt.
Method 2: Using the "Quick Steps" feature
- Open Outlook and navigate to the folder containing the unseen emails.
- Click on the "Home" tab in the ribbon.
- Click on the "Quick Steps" button in the "Move" group.
- Click on "New Quick Step" and select "Mark as Read" from the list of available actions.
- Click "OK" to create the new Quick Step.
- Select the unseen emails by pressing "Ctrl+A" or by using the "Select All" button in the "Home" tab.
- Right-click on the selected emails and choose the "Mark as Read" Quick Step you just created.
Method 3: Using a VBA script
-
Open Outlook and navigate to the folder containing the unseen emails.
-
Press "Alt+F11" to open the Visual Basic Editor.
-
In the Editor, click "Insert" > "Module" to insert a new module.
-
Paste the following code into the module:
Sub DeleteUnseenEmails() Dim olFolder As MAPIFolder Dim olItems As Items Dim olItem As Object Set olFolder = Application.ActiveExplorer.CurrentFolder Set olItems = olFolder.Items For Each olItem In olItems If olItem.Unread Then olItem.Delete End If Next olItem End Sub
-
Click "Run" > "Run Sub/User Form" to execute the script.
-
Confirm that you want to delete the unseen emails by clicking "OK" in the prompt.
Note: Before using the VBA script, make sure to backup your Outlook data and test the script in a non-production environment to ensure it works as expected.
Remember to always be cautious when deleting emails, as this action is permanent and cannot be undone.