E-Mail in Windows-Ordner mit Betreff als Dateiname speichern

Ich möchte bestimmte E-Mails (Tickets) in einem Ordner gespeichert werden.E-Mail in Windows-Ordner mit Betreff als Dateiname speichern

Meine Suche schickte mich zu diesem Post (Macro to save e-mail as text file, to be used in a rule).

Wenn ich versuche, die Ausgabe die Betreffzeile zu machen bekomme ich

Outlook kann die aufgrund eines Berechtigungsfehlers nicht vollständig speichern.

Mit SenderName oder Zeit/Datum funktioniert es.

Public Sub SaveEmail(msg As Outlook.MailItem) 
    ' assume an email is selected 
    Set msg = ActiveExplorer.Selection.Item(1) 

    ' the 2nd and 3rd options work but the 1st does not 
    ' msg.SaveAs "C:\" & msg.Subject & ".msg", olTXT 
    ' msg.SaveAs "C:\" & Format(Now, "YYYYMMDDHHMMSS") & ".txt", olTXT 
    msg.SaveAs "C:\" & msg.SenderName & ".txt", olTXT 
End Sub

Quelle

2017-12-18 Chad Belerique

Können Sie ein Beispiel für eine Betreffzeile angeben? Ich frage mich meistens, ob eine Betreffzeile unzulässige Zeichen enthält und/oder Zeichenbeschränkungen in Windows-Dateinamen verletzt. –

Übergeben Sie nicht ein ** MailItem ** an dieses 'Sub SaveEmail()'? Warum hast du es auf das selbe ausgewechselt? Was passiert, wenn das ausgewählte Objekt keine Postsendung ist? – PatricK

https://www.experts-exchange.com/questions/28025657/Vba-Code-Eliminate-Illegal-Characters-from-a-filename.html – braX

Nicht alle Zeichen können in einem Dateinamen verwendet werden. Nämlich diese.

Es gibt viele Orte online, um eine vor geschriebene Funktion zu finden, die sie entfernen oder ersetzen wird. Hier ist eine: Remove Illegal Characters from Filename

Quelle

2017-12-21 19:42:05 braX

E-Mail in Windows-Ordner mit Betreff als Dateiname speichern

Antwort

Verwandte Themen