Follow the
simple steps mentioned below and see the result ( this will ensure that e-mails
won’t go without subject
1. Open your outlook.
2. Press Alt + F11. This opens the Visual Basic Editor
3. On the Left pane, one can see "Microsoft Outlook objects", expand this. Now one can see the "ThisOutLookSession".
4. Click on "ThisOutLookSession".
5. Copy and Paste the following code in the right pane. (Code Pane)
6. Save this and now close the VB code editor and take a breath. From now on, this macro will make sure you do not make the mistake of sending a mail without subject.
v Note that, Macro security level for this should be Medium.
v Go to Tools -> Macro -> Security Level in the outlook menus and ensure the security level is set to Medium.
Medium Level Security will ask you at startup of outlook to enable the Macro.
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
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
0 comments:
Post a Comment