filecopy

beim öffnen von einer Tabelle möchte mit Filecopy ich eine andere Datei unter einen anderen Name kopieren. Das klappt, allerdings wenn ich die Datei schon geöffnet habe gibt es Laufzeitfehler 70.
Gibt es mit vba eine Möglichkeit diese Tabelle doch zu kopieren obwohl diese geöffnet ist? Mit dem Explorer kann man doch auch Dateien kopieren obwohl die geöffnet sind (oder ist das zu einfach gedacht)

Grüße und schon Danke

Niek

Makro lautet:

Sub auto_open()
Dim Quelldatei, Zieldatei
Dim All_Path
Dim All_File
Application.ScreenUpdating = False
Quelldatei = "C:\Tabelle_temp.xls"
Zieldatei = "C:\Tabelle_orginal.xls"
FileCopy Quelldatei, Zieldatei
End Sub