Du vet at sikkerhetskopiering av arbeidet er viktig. Nå kan du få en Excel makro gjøre det for deg. Denne enkle makro lagrer arbeidsboken til en ny fil med dagens dato som en del av navnet.

Hvordan makro verk

Trikset til denne makroen sette sammen den nye filnavn som banen, dagens dato, og den opprinnelige filnavnet.

Banen er fanget ved hjelp av Sti eiendommen av Thisworkbook objektet. Dagens dato er fanget med Dato funksjon.

Som standard returnerer Dato funksjon mm /dd /åååå. Skråstreker ville føre til at filen redde for å mislykkes, så du formatere dato ved hjelp av bindestrek i stedet ("mm-dd-yy" Format (Date,)) fordi Windows ikke tillater skråstreker i filnavn.

De siste stykke av det nye filnavnet er det originale filnavnet. Du fange den ved å bruke navn eiendommen av Thisworkbook objekt:
Sub Makro1 () 'Trinn 1: Lagre arbeidsbok med nytt filnavn ThisWorkbook.SaveCopyAs _ Name: = ThisWorkbook.Path & "\\" &Amp; _ Format (dato, "mm-dd-åå") & "" &Amp; _ ThisWorkbook.NameEnd Sub

I den ene og eneste skritt, bygger makroen et nytt filnavn og bruker SaveCopyAs metode for å lagre filen.

Hvordan bruke makroen

For å implementere denne makroen, kan du kopiere og lime den inn i en standard modul.

Aktiver Visual Basic Editor ved å trykke Alt + F11

Høyreklikk navnet på prosjektet /arbeidsbok i prosjektet . vindu

Velg Sett → Module

Skriv eller lim inn koden i den nyopprettede modulen
..