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: 56.842  | #66
◀ Vorheriges Beispiel Nächstes Beispiel ▶
OLKeeper OLKeeper
Der OLKeeper verhindert zuverlässig, dass Sie Microsoft Outlook unbeabsichtigt schließen und so etwa wichtige Emails verpassen würden.

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