Du ved, at det er vigtigt at sikkerhedskopiere dit arbejde. Nu kan du få en Excel-makro til at gøre det for dig. Denne simple makro gemmer din projektmappe til en ny fil med dagens dato som en del af navnet.
Sådan fungerer makroen
Tricket til denne makro er at sammensætte det nye filnavn som stien, dagens dato og det originale filnavn.
Stien fanges ved at bruge egenskaben Path for ThisWorkbook-objektet. Dagens dato gribes med datofunktionen.
Som standard returnerer funktionen Dato mm/dd/åååå. Fremadgående skråstreger ville medføre, at fillagringen mislykkedes, så du formaterer datoen ved hjælp af bindestreger i stedet (Format(dato, "mm-dd-åå")), fordi Windows ikke tillader skråstreger i filnavne.
Det sidste stykke af det nye filnavn er det originale filnavn. Du fanger det ved at bruge egenskaben Name for ThisWorkbook-objektet:
Undermakro1()
Trin 1: Gem projektmappe med nyt filnavn
ThisWorkbook.SaveCopyAs _
Filnavn:=ThisWorkbook.Path & " & _