Microsoft Outlook Tips – How to prevent sending emails without Subject

Find below the steps to warn you before sending an email without subject using Microsoft Outlook 

1.      Open your outlook

2.      Press Alt+F11. This opens the Visual Basic editor

3.      On the Left Pane, you can see “Microsoft Outlook Objects” or “Project1”, expand this. Now you can see the “ThisOutLookSession”.

4.      Double click on “ThisOutLookSession”. It will open up a code pane.

5.      Copy and Paste the following code in the right pane.(Code Pane)

‘============================================================================

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)

    Dim strSubject As String

    strSubject = Item.Subject

    If Len(Trim(strSubject)) = 0 Then

        Prompt$ = “Subject is Empty. Are you sure you want to send the Mail?”

        If MsgBox(Prompt$, vbYesNo + vbQuestion + vbMsgBoxSetForeground, “Check for Subject”) = vbNo Then

                Cancel = True

        End If

    End If

 End Sub

‘============================================================================

6. Save this  and now close the VB Code editor. This macro will make sure you do not make the mistake of sending a mail without a subject.

In Category: Technical

Ravi Shankar

A Software developer and blogger who is always looking to provide technical help to the wider community.

Show 3 Comments
  • Ed October 8, 2007, 3:37 pm

    After pasting the code, convert the quotes to the normal quote character, or you will get a syntax error.

  • Rob Venstra April 20, 2009, 10:07 am

    Just make it a habit to always start with the subject line and end with the addressline.

    A good habit is a joy forever!

  • Ulf July 6, 2009, 10:23 am

    Nice one. Thanks very much. As a former Thunderbird user the lack of this functionality was annoying the hell out of me.

Leave a Comment

Get your free copies of the following tech guides by joining the Digital Answers mailing list.