How many times have you sent an email without a subject? yes You! A quick search in my emails tells me that I have been guilty of doing this 6 times this year alone

If you are like me (and you use Outlook like me) you will definitely benefit from my friend’s latest post.

He has been plagued by the same problem for ages but unlike me he decided to do something about, he did his research and found that Outlook MVP Sue Mosher had already wrote code to fix this issue.

The solution is a simple macro that you put in Outlook to warn you and stop the sending process if there is no subject.

I tried it and it worked perfectly, I had a problem when I copied the code from Abdelhalim’s post because of the double quotes, so I recopied the code here and fixed this issue, if you get errors when you paste this code in VB, delete all double quotes and rewrite them.

Private Sub Application_ItemSend _
(ByVal Item As Object, Cancel As Boolean)
Dim strMessage As String
Dim lngRes As Long
If Item.Subject = “” Then
Cancel = True
strMessage = “Please fill in the subject before sending.”
MsgBox strMessage, _
vbExclamation + vbSystemModal, “Missing Subject”
Item.Display
End If
End Sub

Check the complete instructions and warning on the original post.

[link] [via]