ich habe folgendes Problem. In dem Ordner, in dem die aktuell geöffnete Datei liegt, liegen noch andere Dateien. Diese möchte ich per Marko in andere Ordner kopieren. Leider funktioniert das irgendwie nicht. Es kommt immer die Fehlermeldung Pfad nicht gefunden.
Würd mich freuen, wenn mir jemand weiter helfen könnte.
Quelle = Application.ActiveWorkbook.Path
Quelle = Quelle + "\Test.doc"
Ziel = Application.TemplatesPath
MsgBox Quelle & Ziel
FileCopy Quelle, Ziel
MsgBox "Datei wurde kopiert!", vbOKOnly + vbInformation, "Ich habe fertig"
Gruß
Markus