Using the ItemSend Event : Application Events « Application « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Application
  3. Application Events

Using the ItemSend Event

 
Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    If Item.Subject = "" Then
        MsgBox "Please add a subject line to this message."
        Cancel = True
    End If
End Sub








Related examples in the same category

1.Using the Startup Event
2.Using the Quit Event
3.Using the AdvancedSearchComplete Event and the AdvancedSearchStopped Event