Datei-Kopie mit aktuellem Namen speichern
11.01.2009 00:23:31
Lenni
Ich möchte nicht nur, das meine Datei automatisch gespeichert wird, es soll auch eine Kopie der Datei an einem anderen fest definierten Ort gespeichert werden.
Folgenden Code verwende ich:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
Me.SaveCopyAs "D:\Ablage\Saver\MeineDatei.XLS"
End Sub
...der funktioniert auch richtig gut! ...es stört nur eine Kleinigkeit: Der Dateiname muss in diesem Beispiel immer vollständig stehen.
Gibt es die Möglichkeit, dass eine Kopie unabhängig von der Namensangabe gespeichert wird? Wenn die Datei umbenannt wird, dann soll sie automatisch mit dem neuen Namen als Kopie gespeichert werden.
Vielen Dank!
Viele Grüße aus dem hohen Norden!
Lenni