Outlook – Delete a new email draft you’re editing in Outlook

microsoft-outlookmicrosoft-outlook-2013

Using Outlook 2013. When you compose a new email there is usually a way to quickly get rid of it in case you no longer want to send the email. Is there a way to do this in Outlook?

I tried closing the message (and not save/keep when asked) but that creates a new unread item in my deleted items folder causing it to light up like a Christmas tree. I then have to manually go into that folder to clean the draft up.

I'm looking for something like Gmail's trashcan icon. A simple one-click painless way of getting rid of the message once and for all. (There are occasions when I want to save a draft – just in case -, but more often I do not.)

UPDATE: You can expose a "Delete" button on the "Quick Access Toolbar" at the top, which results in the message item being deleted. This works at the time when you just started typing a new email. Clicking delete destroys the message after the mandatory warning. But(!), as soon as the email is auto-saved (after some time) it goes into Drafts folder. Deleting the message at this point KEEPS the message as it is merely moved into Deleted Items.

Is there some setting that can make Outlook mimic Gmail's trashcan button when creating a new email? It's such a simple use case: "I don't want to send the email I just started, changed my mind, get rid of it, erase all traces of it." Is this another Microsoft feature shortcoming?

Best Answer

  1. You can write a VBA script that does something like Discard by marking message as read and removing them to Deleted Items. After that place the button on message window that runs the macro (using Customize Ribbon -> Macros).

Something like this:

Sub Discard()
    On Error Resume Next
    Dim objItem As MailItem

    Set objInspector = ActiveInspector
    If Not objInspector Is Nothing Then
        Set objItem = objInspector.CurrentItem
        If Not objItem Is Nothing And Not objItem.Sent Then
            objItem.UnRead = False
            objItem.Delete
        End If
    End If
End Sub
  1. Free Quick Tweaks Add-In can mark all deleted items as read automatically.
  2. SHIFT+DEL eliminates selected messages in message list without placing it them Deleted Items.
Related Question