Sicherheitskopie erstellen
12.09.2005 12:57:40
andi
warum läuft folgender Code nicht?
Sub sicherheitskopie()
Dim fName As String
fName = (Time & "_" & ThisWorkbook.name)
ActiveWorkbook.SaveCopyAs ThisWorkbook.Path & fName
End Sub
Möchte eine Sicherheitskopie erstellen.
Danke für jede Hilfe.
Gruß Andi