VBA Dateikopie
04.05.2023 01:22:14
Bill
Moin,
ich möchte eine Exceldatei per VBA in einem anderen Ordner auf einem Server speichern. Die Datei wird von mehreren Personen aktualisiert, welche auch alle Zugriff auf die Server haben. Bei dem Schließen der Datei (egal durch wen) soll eine Kopie auf an einem anderen Ort gespeichert werden. Das funktioniert auch soweit. Jedoch löst mein Makro nur bei mir aus. Wenn eine Person von einem anderen PC es versucht kommt die Fehlermeldung: Laufzeitfehler 1004.
Muss ich noch die Entfernung des Schreibschutzes ins Makro einbauen? Wenn ja, wie?
Außerdem soll die Kopie nach jeder Speicherung (durch egal wen) überschrieben werden.
Hier meine bisherigen Codes:
Sub BackupErstellen()
'Kopie in anderem Ordner abspeichern
ThisWorkbook.SaveCopyAs Filename:="\\
" & "\Backup.xlsm"
End Sub
Und
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Call Modul1.BackupErstellen
'Application.Run ("BackupErstellen")
a = MsgBox("Kopie für die mobile Ansicht wurde erstellt!", vbOKOnly, "Speicherhinweis")
End Sub
Den Pfad habe ich Mal durch ersetzt.
Vielen Dank im Voraus!