Jak duplikovat soubory aplikace Excel pomocí makra
Chcete zkopírovat sešit aplikace Excel a dát mu nový název? Samozřejmě to můžete udělat přes Windows, ale jak to zautomatizujete v Excelu? Jednou z možností je otevřít příslušný sešit a poté jej uložit pod novým názvem.
Trvá to však hodně času a je to těžkopádné, protože Excel při otevření sešitu provádí výpočty, aktualizuje odkazy a podobně. Je to jednodušší provést přímo pomocí příkazu VBA FileCopy. Následující makro zkopíruje sešit z jednoho adresáře do druhého a zadá nový název:
Kopírovat dílčí sešit ()
Dim zdroj jako řetězec, cíl jako řetězec
Zdroj = "c: \ August.xls"
Cíl = "c: \ data \ September.xls"
Zdroj FileCopy, cíl
End Sub
Vložte proměnnou zdroj Zadejte název a cestu k souboru, který chcete kopírovat. Uložit do proměnné cílová cestu a cíl souboru. V ukázkovém programu je soubor August.xls z cesty C: \ uložen pod novým názvem September.xls do cesty C: \ Daten. Zdrojový soubor August.xls zůstává beze změny.
Pomocí příkazu můžete nejen kopírovat sešity aplikace Excel, ale také další soubory.
