Tiedät, että työsi varmuuskopiointi on tärkeää. Nyt voit antaa Excel-makron tehdä sen puolestasi. Tämä yksinkertainen makro tallentaa työkirjasi uuteen tiedostoon, jonka nimessä on tämän päivän päivämäärä.
Kuinka makro toimii
Tämän makron temppu on yhdistää uusi tiedostonimi poluksi, tämän päivän päivämäärä ja alkuperäinen tiedostonimi.
Polku kaapataan käyttämällä ThisWorkbook-objektin Path-ominaisuutta. Päivämäärä nappataan päivämäärätoiminnolla.
Oletusarvoisesti Päivämäärä-funktio palauttaa kk/pp/vvvv. Kenoviivat aiheuttaisivat tiedoston tallennuksen epäonnistumisen, joten muotoile päivämäärä käyttämällä väliviivoja (Muoto (Päivämäärä, “kk-pp-vv”)), koska Windows ei salli vinoviivaa tiedostonimissä.
Uuden tiedostonimen viimeinen osa on alkuperäinen tiedostonimi. Voit tallentaa sen käyttämällä ThisWorkbook-objektin Name-ominaisuutta:
Alamakro1()
'Vaihe 1: Tallenna työkirja uudella tiedostonimellä
ThisWorkbook.SaveCopyAs _
Tiedostonimi:=Tämä työkirja.Path & " & _