V tomto tutoriálu se s vámi podělím o 5 vhodné způsoby uložení kopie souboru excel v XLSX formát pomocí VBA . Tyto metody můžete použít v jakémkoli typu sešitu, ať už obsahuje velké nebo malé množství dat. Také proto, že budeme používat VBA , nezabere vám splnění úkolu prakticky žádný čas.

Stáhnout cvičebnici

Cvičebnici si můžete stáhnout zde.

Co znamená soubor XLSX?

Na stránkách XLSX je soubor MS Excel Otevřený tabulkový procesor ve formátu XML který ukládá data do buněk obsažených uvnitř pracovních listů. Buňky jsou uspořádány ve struktuře řádek-sloupec. MS Excel 2007 a dříve byl tento tabulkový soubor typu XLS .

5 vhodných způsobů uložení kopie souboru aplikace Excel jako XLSX pomocí VBA

V tomto tutoriálu vám chceme ukázat, jak uložit aktuální sešit do složky. XLSX Proto jsme vzali jednoduchý a stručný datový soubor, který má 3 sloupců a 6 záznamy o známkách studentů. Máte však možnost použít vlastní datové sady.

1. Použití metody SaveCopyAs

Metoda SaveCopyAs na adrese Excel VBA přebírá objekt sešitu a může uložit novou kopii tohoto sešitu do složky XLSX bez úpravy dat. Podívejme se, jak tuto metodu použít v našem kódu.

Kroky:

• Nejprve přejděte do Vývojář a vyberte možnost Visual Basic .

• Dále v Visual Basic klikněte na Vložte a vyberte Modul .

• Nyní do nového okna modulu vpravo zadejte následující vzorec:

 Sub SaveCopyAs_Method() Application.DisplayAlerts = False ActiveWorkbook.SaveCopyAs "C:\Users\USER\Desktop\5700\SaveCopyAs method.xlsx" End Sub 

• Potom zavřete VBA a přejděte do okna Vývojář znovu na kartě.
• Zde vyberte Makra .

• Nyní v Makro se zobrazí kód makra, který jsme vložili.
• Dále klikněte na Spusťte .

• Nakonec otevřete složku, do které jste soubor uložili, a ten by měl být k dispozici ve složce XLSX formát, který jsme chtěli.

Další informace: Jak uložit soubory maker aplikace Excel jako název souboru z hodnoty buňky

2. Zadání názvu souboru

Kopii souboru excel můžeme uložit do souboru XLSX zadáním názvu souboru do pole VBA Při nastavování názvu souboru přidáme také příponu souboru, která převede soubor do námi požadovaného formátu. Chcete-li pokračovat v této metodě, vložte níže uvedený kód do pole VBA okno modulu.

 Sub Specify_file_name() Dim location As String location = "C:\Users\USER\Desktop\5700\Specify file name.xlsx" ActiveWorkbook.SaveAs Filename:=location End Sub 

Po zadání kódu jej jednoduše spusťte z okna Makra jak jsme si ukázali dříve. Nyní přejděte do složky pro ukládání a do souboru s příponou XLSX formát by tam měl být nyní.

Přečtěte si více: Excel VBA pro uložení sešitu do určité složky s datem

3. Zadání čísla formátu souboru

Čísla formátu souboru jsou jedinečná čísla, která při ukládání označují konkrétní typ souboru. V tomto návodu je naším cílem uložit kopii souboru Excel jako XLSX soubor pomocí VBA . Použijeme tedy formát čísla 51 , která označuje XLSX zadejte následující kód do pole VBA modul:

 Sub file_format_number() Dim location As String Application.DisplayAlerts = False location = "C:\Users\USER\Desktop\5700\File format number" ActiveWorkbook.SaveAs Filename:=location, FileFormat:=51 End Sub 

Pokud nyní spustíte tento kód, Excel okamžitě uloží sešit do složky XLSX formát. To můžete potvrdit kontrolou v cílové složce.

Přečtěte si více: Excel VBA Uložit jako formát souboru (12 vhodných příkladů)

4. Ukládání pomocí hesla

V mnoha případech je velmi důležité uložit kopii sešitu aplikace Excel do. XLSX To platí zejména pro sešity, u nichž je třeba dbát na vysokou míru zabezpečení. Tohoto úkolu můžete dosáhnout velmi snadno pomocí nástroje VBA a nastavení vlastního hesla spolu s uložením dokumentu. Za tímto účelem zadejte níže uvedený příkaz VBA kód v Modul okno:

 Sub Save_With_Password() Application.DisplayAlerts = False ActiveWorkbook.SaveAs _ Filename:="C:\Users\USER\Desktop\5700\Save with password.xlsx", Password:="one" End Sub 

Nakonec, jak jsme viděli dříve, stačí tento kód spustit z příkazu Makra Nyní, když přejdete do uložené složky, měli byste najít soubor s názvem, který jste zadali, a možnostmi XLSX prodloužení na konci.

Přečtěte si více: Excel VBA: Uložit list jako nový sešit bez otevření

5. Ušetřete tím, že doporučíte pouze ke čtení

Méně přísným způsobem ochrany dokumentu je vytvořit z něj soubor pouze pro čtení. Pokud uložíte kopii souboru Excel do složky XLSX pak můžete nastavit podmínku pouze pro čtení pomocí příkazu VBA . Nyní vložte následující kód do pole VBA modul:

 Sub recommend_read_only() Application.DisplayAlerts = False ActiveWorkbook.SaveAs _ Filename:="C:\Users\USER\Desktop\5700\Recommend read only.xlsx", _ ReadOnlyRecommended:=True End Sub 

Pak spusťte tento kód z Makra možnost v rámci Vývojář karta. Tím by se měla uložit XLSX kopii aktuálního sešitu, jak je uvedeno níže.

Přečtěte si více: Excel VBA pro uložení souboru s názvem proměnné (5 příkladů)

Na co nezapomenout

• Ujistěte se, že jste změnili cestu k uložení XLSX v souboru VBA . Měla by odpovídat cestě ke složce v počítači.
• Překontrolujte, zda píšete všechny vestavěné znaky. VBA funguje přesně tak, jak jsem to udělal já.
• Nezapomeňte, že v některých případech VBA kód již nemusí být k dispozici. VBA po spuštění kódu.

Závěr

Doufám, že metody, které jsem ukázal pro uložení kopie souboru excel v XLSX formát pomocí VBA vám byly užitečné. Pokud se v některém z kroků zaseknete nebo kód nefunguje, doporučuji několikrát zkontrolovat kódy, které jsem uvedl. Také zkuste kód do určité míry změnit, abyste pochopili, co kód dělá. A nakonec, abyste se dozvěděli více. excel postupujte podle našich ExcelWIKI Pokud máte nějaké dotazy, dejte mi prosím vědět v komentářích.