Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Excel Makro Sicherheitskopie

Excel Makro Sicherheitskopie
24.11.2017 10:08:03
Julia
Einen schönen guten Morgen an alle,
bin mal wieder verzweifelt und wende mich hilfesuchend an euch.
Mein Problem ist, ich möchte, dass beim Öffnen einer Excel Datei automatisch eine Sicherheitskopie dieser Datei in einen Ordner „Daten“ mit Datum im Dateinamen erzeugt wird.
Bin zwar in Google zu diesem Thema fündig geworden, habe damit leider kein Erfolg.
Da meine VBA Kenntnisse bescheiden sind, könnt ihr mir das bitte ausführlich erklären.
Würde mich riesig freuen, wenn ihr mir helfen könntet.
Liebe Grüße und vielen Dank im Voraus
Julia
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel Makro Sicherheitskopie
24.11.2017 10:31:32
Nepumuk
Hallo Julia,
den Pfad zum Ordner musst du noch anpassen.
Folgendes Makro in das Modul "DieseArbeitsmappe":
Private Sub Workbook_Open()
    Call SaveCopyAs(Filename:="C:\Daten\" & _
        Left$(Name, InStrRev(Name, ".") - 1) & "_" & Format(Date, "yyyy-mm-dd") & ".xlsm")
End Sub

Gruß
Nepumuk
Anzeige
AW: Excel Makro Sicherheitskopie
24.11.2017 10:52:29
Julia
Vielen Dank Nepumuk für die schnelle Antwort, du hast mir sehr geholfen.
AW: Excel Makro Sicherheitskopie
24.11.2017 11:07:48
Julia
Hallo Nepumuk,
wie muss der Code aussehen, wenn noch die Uhrzeit im Dateinamen erscheinen soll.
Mir ist jetzt aufgefallen, dass die Datei mehrmals am Tag geöffnet werden kann.
Gruß Julia
AW: Excel Makro Sicherheitskopie
24.11.2017 11:44:53
Nepumuk
Hallo Julia,
ich hab es mir fast gedacht. Dann so:
Private Sub Workbook_Open()
    Call SaveCopyAs(Filename:="C:\Daten\" & _
        Left$(Name, InStrRev(Name, ".") - 1) & "_" & _
        Format$(Date, "yyyy-mm-dd") & "_" & Format$(Time, "Hh-Nn-Ss") & ".xlsm")
End Sub

Gruß
Nepumuk
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige