VBOffice

Hinweis anzeigen, wenn der Betreff fehlt

Dieses Beispiel zeigt, wie Sie vorm Senden einer Email prüfen können, ob bestimmte Daten vorhanden sind und ggf. den Sendevorgang abbrechen können.

Zuletzt geändert: 19.06.2008 | Aufrufe: 62.467  | #66
◀ Vorheriges Beispiel Nächstes Beispiel ▶
Reporter Reporter
Mit dem Reporter erstellen Sie Berichte für Ihre Outlook Daten. Mit wenigen Klicks werden Werte aus Aufgaben, Terminen und dem Journal summiert.

Vergessen Sie manchmal, Ihren E-Mails einen Betreff zu geben? Kopieren Sie dieses Beispiel ins Modul DieseOutlookSitzung, dann erhalten Sie eine Meldung, wenn der Betreff fehlt.


tip  So fügen Sie Makros in Outlook ein
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
  If Trim(Item.Subject) = "" Then
    Cancel = True
    MsgBox "Der Betreff fehlt", vbInformation
  End If
End Sub
SAM SAM
Legen Sie fest, mit welcher "Identität" Ihre Emails beim Empfänger erscheinen sollen. Mit SAM bestimmen Sie den Absender und Speicherort für Emails anhand von Regeln.
email  Senden Sie eine Nachricht