En Excel-makro for å lage en øyeblikket datert arbeidsboks sikkerhetskopiering - dummies

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

Slik fungerer makroen

Trikset til denne makroen kutter sammen det nye filnavnet som banen, dagens dato og det opprinnelige filnavnet.

Banen er fanget ved å bruke Path-egenskapen til ThisWorkbook-objektet. Dagens dato gripes med Date-funksjonen.

Som standard returnerer Date-funksjonen mm / dd / yyyy. Fremoverstreker vil føre til at filen lagres, slik at du formaterer datoen ved hjelp av bindestreker i stedet (Format (Dato, "mm-dd-åå")) fordi Windows ikke tillater fremoverstreker i filnavn.

Det siste stykket av det nye filnavnet er det opprinnelige filnavnet. Du fanger det ved å bruke Name-egenskapen til ThisWorkbook-objektet:

Sub Macro1 () 

'Trinn 1: Lagre arbeidsbok med nytt filnavn 
ThisWorkbook. SaveCopyAs _ 
Filnavn: = ThisWorkbook. Sti & "& _