Automatisch beim öffnen speichern
27.11.2002 17:46:31
roman
habe von euch den untenstehenden Code erhalten. Dieser geht gut, leider speichert er dann die Datei in eigene Dateien ab.
Gibt es eine Möglichkeit den Code zu erweitern, so das ich vorgeben kann, wo (automatisch) gespeichert werden soll ?
Komme damit nicht klar.
Habe mal den Speicherweg per Makro aufgzeichnet, der ist dann so :
"W:\BB-LL-so\det\Ordner-So"
Private Sub Workbook_Open()
On Error Resume Next
ActiveWorkbook.SaveCopyAs (ActiveWorkbook.Name & " Sicherungskopie.xls")
End Sub
Danke für die Hilfe, Roman