It's quite often some time we send mail without mentioning subject line, that creates bad impression some times, to solve this problem I found this solution , thought of sharing with you guys
- Open MS Outlook 2003 /2007
- Press Alt+F11, This will open the Macro Visual Basic Editor
- On the Left Pane, you can see "Microsoft Outlook Objects" expand that
- Look for the menu "ThisOutLookSession"
- Click on the menu "ThisOutLookSession" and copy paste the below code
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, "No Subject Warning") = vbNo Then
Cancel = True
- Save the and close Visual Basic Editor
- Then in Outlook , click Tools > Macros > Security > In the Security Level Tab > Select the option MEDIUM > OK (in outllook 2003)
- In outlook 2007 click Tools > Macros > Security > select warn for all marcros
- Now Restart the Outlook, a dialog box pops up to Disable / Enable the macros; select as Enable Macros (this option will pops up when ever you restart outlook.)
So when ever you send a email without subject a Message Box will popout saying "Subject is Empty. Are you sure you want to send the Mail?" ,
if you want to proceed you can click Yes else No
Thus our problem is solved.