Require Subject for Outlook eMails

Updated 3/10/2018: In newer versions of Outlook this is default behavior, but when I first wrote this post 9 years ago it was not!

This function will prompt for confirmation if you try to send an email with no Subject.

  1. From the Developer Tab, go to the Visual Basic Editor. If the Developer Tab is not visible, follow these steps
    Select Developer Tab, then click Visual Basic Icon
  2. On the left side, double click “ThisOutlookSession” under Project 1 > Microsoft Outlook Objects. Copy and paste the code into the editor

    Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean) 
    Dim strSubject As String
    strSubject = Item.Subject
    If Len(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

  3. Now if you try to send an email without a subject line, you will be prompted before sending!

Original Source (Link no longer works):

Leave a Reply

Your email address will not be published. Required fields are marked *