Eine Excel-Makro zu erstellen Aktuelle Arbeitsmappe Datiert Sicherung
Sie wissen, dass Ihre Arbeit wichtig ist, sichern. Jetzt können Sie ein Excel-Makro zu tun haben es für Sie. Diese einfache Makro speichert Ihre Arbeitsmappe in eine neue Datei mit dem heutigen Datum als Teil des Namens.
Wie die Makro funktioniert
Der Trick, um dieses Makro wird piecing den neuen Dateinamen als Pfad, dem heutigen Datum und dem ursprünglichen Dateinamen zusammen.
Der Pfad wird mit dem Path-Eigenschaft des Objekts erfasst Thisworkbook. Das heutige Datum wird mit dem Datum der Funktion packte.
Standardmäßig gibt die Funktion Datum mm / tt /. Schrägstri- würde bewirken, dass die Datei zum Scheitern verurteilt zu speichern, so dass Sie das Datumsformat Bindestriche statt (Format (Datum, "mm-dd-yy")), da Windows nicht erlaubt, Schrägstriche in Dateinamen verwenden.
Das letzte Stück des neuen Dateinamen ist der ursprüngliche Dateiname. Sie sie erfassen die Eigenschaft Name des Objekts unter Verwendung von Thisworkbook:
Sub Macro1 () 'Schritt 1: Speichern Sie Arbeitsmappe mit neuen filenameThisWorkbook.SaveCopyAs _Filename: = ThisWorkbook.Path "" _FORMAT (Datum, "mm-dd-yy") "" _ThisWorkbook.NameEnd Sub
In dem einen und einzigen Schritt baut das Makro einen neuen Dateinamen und verwendet die SaveCopyAs Methode, um die Datei zu speichern.
Wie das Makro zu verwenden,
Um dieses Makro implementieren, können Sie es in einem Standardmodul kopieren und einfügen:
Visual Basic-Editor aktivieren, indem Sie Alt + F11 drücken.
rechts, klicken Sie auf das Projekt / die Arbeitsmappe Namen im Projektfenster.
Wählen Sie Einfügen-Modul.
Geben oder den Code in das neu erstellte Modul einfügen.