July 1, 2012

Prevent Outlook from Sending Emails with a Blank Subject

Objective:
In the IT Industry, Outlook is most popularly used as the Email client. The subject line is a very important part of any email. Many times has it happened to you that you have sent an email through Outlook without a subject line? After clicking the Send button, you realize that you have made a mistake (What if it is a case you have sent a mail without Subject to a Client or a Manager?)
By default, Outlook does not validate a mail with a blank subject and here is the solution.
Steps:
1. Open MS Outlook -> Tools -> Macro -> Visual Basic Editor
2. You will see Visual Basic Editor will be opened 
 3. Click ThisOutlookSession which will open the Code Editor paste the below code in the Editor -> Save it and Close the window.
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 EMail?"
      If MsgBox(Prompt$, vbYesNo + vbQuestion + _
            vbMsgBoxSetForeground, _
            "Email Subject is Empty") = vbNo Then
        Cancel = True
      End If
  End If
End Sub
4. Now, restart the outlook. You will be prompted with a window where in Click on Enable Macros.
5. Now try sending an email without subject, you will be prompted for entering a Subject in the Email.

0 comments:

Post a Comment

Dear Readers, I LOVE to hear from you! Your feedback is always appreciated. I will try to reply to your query as soon as possible.

1. Make sure to click the "Notify me" check box at the right side to be notified of follow up comments and replies.
2. Please Do Not Spam - Spam comments will be deleted immediately upon review.