ich möchte die aktive offene Exceldatei in einem anderen Pfad kopieren.
Folgendes habe ich probiert:
Sub DateiKopieren()
Dim sQuelle As String, sZiel As String
sQuelle = "D:\Backup.xls"
sZiel = "C:\Backup.xls"
FileCopy sQuelle, sZiel
End Sub
Das funktioniert nicht weil ja die Datei offen ist.
Wenn ich manuell im Explorer die geöffnete Datei kopiere und woanders hin speicher gibt es auch keine keine Probleme und so sollte es auch mit einem Makro funktionieren.
Es gibt ja die Möglichkeit die Datei 2 mal zu speichern, dies möchte ich aber so nicht haben.
Kennt jemand eine andere Möglichkeit.
Vielen Dank im Voraus!
MFG Andre