
Ich möchte vor dem Senden einer E-Mail benachrichtigt werden, wenn die von mir verfasste E-Mail eine bestimmte Phrase enthält.
Beispiel: Hallo (Kundenname),
Ich möchte benachrichtigt werden, wenn ich vergessen habe, „(Kundenname)“ zu ändern.
Eine ähnliche Situation besteht, wenn Sie in GMail das Wort „angehängt“ verwenden. Der Client weist Sie darauf hin, wenn Sie tatsächlich keine Datei angehängt haben.
Antwort1
Natürlich können Sie das gewünschte Ergebnis auch ganz einfach mit dem folgenden VBA-Makro erreichen:
Public Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
On Error Resume Next
If InStr(Item.Body, "(Client Name)") Then
If MsgBox("Are you sure to send this message?", vbYesNo + vbQuestion + vbMsgBoxSetForeground, "Message Text Warning") = vbNo Then
Cancel = True
End If
End If
End Sub