Erstellen Sie ein Outlook-VBA zum Weiterleiten einer E-Mail mit bestimmten Wörtern in der Betreffzeile

Erstellen Sie ein Outlook-VBA zum Weiterleiten einer E-Mail mit bestimmten Wörtern in der Betreffzeile

Hallo, ich möchte eine Regel oder ein VBA in Outlook erstellen, bei dem die Betreffzeile 3 bestimmte Wörter in beliebiger Reihenfolge enthält. Ich möchte beispielsweise nach „Abzeichen, Benutzer, Moped“ suchen.

Betreff: Die Plaketten und der Benutzer mit einem Moped.

Wenn der Betreff diese drei Wörter enthält, möchte ich, dass die E-Mail an jemanden weitergeleitet wird.

habe diesen von „mark-goldfain“ erstellten Code gefunden und dachte, wir könnten ihn vielleicht ändern? Obwohl ich nichts über VBA-Programmierung weiß.

Public Sub File_Stock_Incoming_Message(Item As Outlook.MailItem)
  ' This macro is called from a wizard-built rule, where the
  ' rule operates on *every* incoming message, and its action
  ' is to call this macro.
  Dim NS As Outlook.NameSpace
  Set NS = Application.Session
  Dim MoveToFolder As Outlook.MAPIFolder
  Set MoveToFolder = NS.Folders("mainboxname").Folders("MsgLog")

  Dim sbjstr As String
  sbjstr = Item.Subject
  If (sbjstr = "Whatever Site Error") Then
    Item.Move MoveToFolder
  End If
End Sub

Antwort1

Sie müssen nur die Bedingung ändern If:

instr(item.subject,"word1")>0 And instr(item.subject,"word2")>0 And instr(item.subject,"word3")>0

verwandte Informationen