Hallo Excel-Experten,
da ich mit Euch bisher nur gute Erfahrungen gesammelt habe, wende ich mich wieder an Euch und hoffe, Ihr könnt mir helfen.
Ich hab ein Tool, was am Ende 3 Dateien in einem Ordner erstellt (1 PDF-Datei und 2 Excel-Dateien). Die Dateien tragen alle den Namen aus der Zelle A1
(PDF-Datei = Test; 1. Excel-Datei = Test und 2. Excel-Datei = Test Vorlage)
Nun möchte ich, daß alle Dateien (bis auf die Excel-Datei = Test Vorlage) in eine Mail eingefügt werden. Die Mailerstellung und die Einfügung der PDF-Datei funktionieren pefekt. Bei der Excel-Datei komm ich an ein Problem, da manchmal die richtige und manchmal die falsche Excel-Datei eingefügt wird.
Nun zu meiner konkreten Frage:
Gibt es eine Möglichkeit, daß ich alle Dateien einfüge lasse außer die das Wort "Vorlage" beinhaltet?
Hier mein Code:
Path = "X:\Test-Ordner\Test\" & Range("A1").Value
Filename = Range("A1") & "*.pdf"
Match = FileSystem.Dir(Path & "\" & Filename)
.Attachments.Add Path & "\" & Match
Path = "X:\Test-Ordner\Test\" & Range("A1").Value
Filename = Range("A1") & "*.xlsx"
Match = FileSystem.Dir(Path & "\" & Filename)
.Attachments.Add Path & "\" & Match
Vielen Dank schon mal im Voraus
Lg
Andi