Kako podvojiti Excelove datoteke z makrom
Bi radi kopirali Excelov delovni zvezek in mu dali novo ime? Seveda lahko to storite prek sistema Windows, kako pa to avtomatizirate v Excelu? Ena od možnosti je, da odprete ustrezen delovni zvezek in ga nato shranite pod novim imenom.
Vendar to traja veliko časa in je okorno, saj Excel ob odprtju delovnega zvezka izvaja izračune, posodablja povezave in podobno. To je lažje narediti neposredno z ukazom VBA FileCopy. Naslednji makro kopira delovni zvezek iz enega imenika v drugega in podaja novo ime:
Kopiraj pod delovni zvezek ()
Vir zatemnitve kot niz, cilj kot niz
Vir = "c: \ August.xls"
Destination = "c: \ data \ September.xls"
Vir FileCopy, cilj
End Sub
Vnesite spremenljivko vir Določite ime in pot datoteke, ki jo želite kopirati. Shrani v spremenljivko tarča pot in cilj datoteke. V primeru programa je datoteka August.xls s poti C: \ shranjena pod novim imenom September.xls na poti C: \ Daten. Izvorna datoteka August.xls ostaja nespremenjena.
Ne samo, da lahko z ukazom kopirate Excelove delovne zvezke, lahko tudi druge datoteke.
