Excel VBA Uložit jako formát souboru (12 vhodných příkladů)

Hugh West

16-10-2023 Makra & Excel VBA
  • Sdílet Toto
Hugh West

Důležité informace ukládáme do Excel sešity. Podle našich požadavků také provádíme různé operace. Proto je nutné soubor po aktualizaci uložit. V opačném případě můžeme přijít o některá cenná data. Existuje několik účinných způsobů jak Uložit . Sešit aplikace Excel . Kromě toho ukládání Excel soubor podle našich požadavků Formát nebo uložení souboru do požadovaného Umístění V tomto článku vám ukážeme nejužitečnější příklady. Excel VBA Uložit jako formát souboru .

Stáhnout cvičebnici

Stáhněte si následující pracovní sešit a procvičujte sami.

VBA Uložit jako formát souboru.xlsm

12 příkladů formátu souboru Excel VBA Uložit jako

Pro ilustraci použijeme jako příklad následující datovou sadu. Datová sada představuje např. Prodejce , Produkt a Čisté tržby společnosti. Zde uložíme tento sešit použitím Excel VBA Uložit jako formát souboru .

1. VBA pro uložení jako soubor aplikace Excel

V našem prvním příkladu si ukážeme jednoduchý Kód VBA zachránit Excel Proto postupujte podle níže uvedených kroků a proveďte tento úkol.

KROKY:

  • Nejprve přejděte na Karta Vývojář.
  • Pak vyberte Visual Basic .

  • V důsledku toho se VBA vyskočí okno.
  • Poté klikněte na tlačítko Vložte .
  • Následně vyberte Modul .

  • Z toho vyplývá, že Modul zobrazí se okno.
  • Poté zkopírujte následující kód a vložte jej do pole. 
 Sub Example_1() ActiveWorkbook.SaveAs End Sub

  • Nyní spusťte kód stisknutím tlačítka F5 .
  • V důsledku toho budete muset zadat název souboru, formát a další požadované informace.
  • Nakonec soubor uloží do zadaného umístění.

Přečtěte si více: Jak uložit pracovní list jako nový soubor pomocí aplikace Excel VBA

2. Zadání přípony souboru pomocí aplikace Excel VBA

V předchozím příkladu jsme museli ručně zadat hodnotu Formát souboru po stisknutí příkazu run. Zde si však ukážeme efektivnější způsob, jak aplikovat Excel VBA Uložit jako formát souboru pro ukládání sešitů v požadovaném formátu. Za název souboru jednoduše zadáme jeho příponu. Vložte tedy níže uvedený kód do souboru Modul okno. 

 Sub Example_2() Dim location As String location = "D:\SOFTEKO\excel vba save as file format.xlsm" ActiveWorkbook.SaveAs Filename:=location End Sub

Tímto způsobem můžete spustit kód a získat soubor v požadovaném formátu a umístění. uložte soubor ve formátu xlsx, typ xlsx namísto xlsm .

Čtěte více: Makro Excel VBA pro uložení PDF do určité složky (7 ideálních příkladů)

3. Kód Excel VBA pro použití formátu souboru

Můžeme však zadat Číslo kódu formátu souboru místo zadání přípony souboru. Některé užitečné kódy jsou: .xlsx = 51 , . xlsm = 52 , .xlsb = 50 , .xls = 56 . Proto zkopírujte následující kód a vložte jej do pole Modul box. 

 Sub Example_3() Dim location As String location = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=location, FileFormat:=52 End Sub

Přečtěte si více: [Opraveno!] Proč Excel neukládá formátování? (7 možných důvodů)

4. Uložení do stejného adresáře pomocí VBA

V tomto příkladu si ukážeme, jak. Uložit v Stejný adresář kde je již soubor s Excel VBA . Proto vložte kód do Modul okno. 

 Sub Example_4() ActiveWorkbook.SaveAs Název souboru:="excel vba uložit jako formát souboru" End Sub

Přečtěte si více: Excel VBA: Výběr umístění a uložení jako PDF

5. VBA pro ukládání do nového adresáře

Soubor však můžeme potřebovat uložit také do souboru Nový adresář . Do pole tedy zadejte následující kód Modul a spusťte jej. 

 Sub Example_5() Dim location As String location = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=location End Sub

6. Požádejte o heslo pro otevření souboru aplikace Excel

Kromě toho můžete použít Excel VBA Uložit jako formát souboru požádat o Heslo na Otevřít soubor aplikace Excel . Vložte a spusťte níže uvedený kód. 

 Sub Example_6() ActiveWorkbook.SaveAs _ Název souboru:="D:\SOFTEKO\excel vba save as file format.xlsm", Heslo:="one" End Sub

Přečtěte si více: Jak uložit soubor aplikace Excel pomocí hesla

Podobná čtení

  • Excel VBA pro uložení souboru s názvem proměnné (5 příkladů)
  • Jak uložit Excel jako PDF krajinu (v rychlých krocích)
  • Excel VBA pro uložení jako soubor pomocí cesty z buňky (s rychlými kroky)
  • Kód VBA pro tlačítko Uložit v aplikaci Excel (4 varianty)
  • [Opraveno!] Soubor CSV aplikace Excel neukládá změny (6 možných řešení)

7. Přidání hesla pro úpravy v aplikaci Excel

Kromě toho můžete požádat o Heslo pro Úpravy na adrese Excel . Bez hesla se otevře pouze ve formátu pro čtení. Zkopírujte kód a vložte ho. Poté kód spusťte. 

 Sub Example_7() ActiveWorkbook.SaveAs _ Název souboru:="D:\SOFTEKO\excel vba save as file format.xlsm", WriteRes:="one" End Sub

8. Otevřít ve formátu pouze pro čtení

Pro otevření souboru v Formát pouze pro čtení , zadejte níže uvedený kód a stiskněte tlačítko F5 k jeho spuštění. 

 Sub Example_8() ActiveWorkbook.SaveAs _ Název souboru:="D:\SOFTEKO\excel vba save as file format.xlsm", _ ReadOnlyRecommended:=True End Sub

Přečtěte si více: Jak otevřít dokument aplikace Word a uložit jej jako PDF nebo Docx pomocí aplikace Excel VBA

9. Vytvoření dialogového okna "Uložit jako

Další užitečná operace Excel VBA pro uložení jako formát souboru je generovat Dialogové okno Uložit jako . Proto vložte níže uvedený kód. 

 Sub Example_9() Application.GetSaveAsFilename End Sub

Přečtěte si více: Makro aplikace Excel pro uložení do formátu PDF (5 vhodných příkladů)

10. VBA pro vytvoření & uložení nového sešitu

Kromě uložení souboru můžeme také Vytvořit & Uložit nový sešit s VBA Chcete-li provést tento úkol, zadejte níže uvedený kód do pole Modul a stiskněte tlačítko F5 . 

 Sub Example_10() Dim book As Workbook Set book = Workbooks.Add Application.DisplayAlerts = False book.SaveAs Filename:="D:\SOFTEKO\excel vba save as file format.xlsm" Application.DisplayAlerts = True End Sub

Další informace: Excel VBA: Uložit list jako nový sešit bez otevření

11. Uložení aktivního sešitu v aplikaci Excel

Stejně tak můžeme uložit aktivní sešit, ve kterém je již uložen. Operaci provedeme vložením velmi jednoduchého kódu. 

 Sub Example_11() ActiveWorkbook.Save End Sub

Přečtěte si více: Jak uložit makro pro všechny sešity v aplikaci Excel (ve snadných krocích)

12. VBA pro uložení do formátu PDF v aplikaci Excel

Nakonec můžeme použít PDF přípona souboru v našem VBA kód pro uložení do Formát PDF . Takže použijte Excel VBA Uložit jako formát souboru Poté spusťte kód stisknutím tlačítka F5 . 

 Sub Example_12() ActiveSheet.SaveAs Název souboru:="excel vba save as file format.pdf" End Sub

Přečtěte si více: Jak uložit Excel jako PDF (6 užitečných způsobů)

Závěr

Od nynějška budete moci ukládat soubory s následujícími příponami Excel VBA Uložit jako formát souboru podle výše popsaných příkladů. Používejte je i nadále a dejte nám vědět, pokud máte další způsoby, jak tento úkol provést. Sledujte ExcelWIKI webové stránky pro další články, jako je tento. Nezapomeňte napsat komentáře, návrhy nebo dotazy, pokud máte nějaké, do sekce komentářů níže.

Předchozí příspěvek Jak konsolidovat data z více řádků v aplikaci Excel (4 rychlé metody)
Další příspěvek Jak vypočítat procento slevy pomocí vzorce v aplikaci Excel

Hugh West je velmi zkušený školitel a analytik Excelu s více než 10 lety zkušeností v oboru. Má bakalářský titul v oboru Účetnictví a finance a magisterský titul v oboru Business Administration. Hugh má vášeň pro výuku a vyvinul jedinečný přístup k výuce, který lze snadno sledovat a pochopit. Jeho odborné znalosti Excelu pomohly tisícům studentů a profesionálů po celém světě zlepšit své dovednosti a vyniknout ve své kariéře. Prostřednictvím svého blogu Hugh sdílí své znalosti se světem a nabízí bezplatné výukové programy Excelu a online školení, které jednotlivcům a firmám pomohou dosáhnout jejich plného potenciálu.