Drucken bei versendeter Mail mit bestimmten Betreff

Moderator: ModerationP

Drucken bei versendeter Mail mit bestimmten Betreff

Beitragvon dreamar99 » 01. Sep 2021, 07:56

Guten Morgen,

ich möchte gerne alle gesendeten Mails die im Betreff mit "Bestellung" beginnen ausdrucken. Ich habe den folgenden Code gefunden und weiß aber nicht wie ich das auf den Betreff abändere.

Code: Alles auswählen
Public WithEvents myOlItemSend As Outlook.Items

Public Sub Application_startup()
    Set myOlItemSend = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderSentMail).Items
End Sub

Private Sub myOlItemSend_ItemAdd(ByVal Item As Object)
    If MsgBox("Soll die E-Mail gedruckt werden?", _
        vbYesNo, "Drucken?") = vbYes Then

    Item.PrintOut
   
    End If
   
End Sub



Kann mir da jemand behilflich sein?
Danke
dreamar99
Im Profil kannst Du frei den Rang ändern
 
Beiträge: 3
Registriert: 14. Jul 2017, 07:47

Re: Drucken bei versendeter Mail mit bestimmten Betreff

Beitragvon < Peter > » 01. Sep 2021, 08:42

Hallo,

bei der VBA-Geschichte kann ich dir nicht helfen, aber reicht eine entsprechende Regel die auf die Gesendeten Elemente angewendet wird, nicht aus?
Gruß
Peter
Benutzeravatar
< Peter >
Moderator
 
Beiträge: 66665
Registriert: 04. Sep 2004, 10:19
Wohnort: Das schönste Land in Deutschlands Gaun

Re: Drucken bei versendeter Mail mit bestimmten Betreff

Beitragvon Gast » 01. Sep 2021, 12:56

Hallo Peter,

leider reicht das nicht, da ich nur die angedruckt haben möchte die mit "Bestellung" beginnen. Die Regel prüft nur ob eines der Wörter dem entspricht, egal an welcher Stelle.
Gast
 


Zurück zu Outlook Forum (provisorisch)

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 5 Gäste