Hope This Helps

Problem:

Man möchte gerne bestimmte Anhänge in einem Ordner speichern. Idealerweise soll das nur bei bestimmten Absendern passieren.

Lösung:

Hier ist eine Zwei-Stufen-Lösung, die ich mehrfach angewandt habe:

1. Stufe: VBA-Marko für das Speichern des Anhangs
Hierfür fügt man im Outlook im VBA-Editor (Alt+F11) folgendes Makro hinzu:

Zitat Sub Anlagen_Speichern(olMail As MailItem)

Dim Anlagen As Attachments
Dim Ziel As String
Dim i As Integer

'Speicherziel angeben (mit Backslash abschließen) - Beispiel:
Ziel = "C:\"

On Error Resume Next

Set Anlagen = olMail.Attachments
For i = 1 To Anlagen.Count
Anlagen.Item(i).SaveAsFile Ziel & Anlagen.Item(i).FileName
Next i

End Sub

2. Stufe: Outlook-Regel
Man erstellt nun eine Regel, die folgende Bedingung erfült und entsprechende Aktion ausführt

Alle ankommenden Mails überprüfen - wenn Mail von kommt - dann folgedes Skript ausführen (Makro "Anlagen_Speichern" von Auswahl auswählen)

Sobald diese Regel eingerichtet ist, wird der Anhang von jeder Mail des angegebenen Absenders im definierten Ordner gespeichert.

WICHTIG:
Der Ordner muß vorher stellt werden.
Der Ordner kann im Marko geändert werden.
Die Ordnerangabe muß mit "\" enden!