Excel VBA: Uloženie a zatvorenie zošita (5 vhodných príkladov)

  • Zdieľajte To
Hugh West

V tomto článku vám ukážeme 5 metódy používania Excel VBA na uložiť a zatvoriť Pracovný zošit Keďže čas je veľmi cenný, môžeme ušetriť veľa času vynechaním všedných úloh pomocou Excel VBA Okrem toho sme vzali súbor údajov pozostávajúci z 3 stĺpce : " Názov ", " Narodený " a " Najnovšia práca ". Tento súbor údajov predstavuje 6 rok narodenia a najnovšie informácie o filme.

Stiahnite si cvičebnicu

VBA na uloženie a zatvorenie zošita.xlsm

5 príkladov na uloženie a zatvorenie zošita pomocou VBA v programe Excel

1. Uloženie a zatvorenie aktívneho zošita pomocou programu Excel VBA

Pri prvej metóde budeme uložiť a zavrieť . Aktívny zošit pomocou Makro VBA . Budeme sa venovať Modul VBA okno, zadajte náš kód a potom ho vykonajte, aby ste dosiahli náš cieľ. Bez ďalších zbytočných rečí sa vrhnime na postup po jednotlivých krokoch.

Kroky:

Pred zadaním nášho kódu musíme vyvolať Modul VBA . K tomu -

  • Po prvé, z Vývojár karta>>> vybrať Visual Basic .

Prípadne môžete stlačiť ALT + F11 to urobiť tiež. " Microsoft Visual Basic pre aplikáciu " sa zobrazí po tomto kroku.

  • Po druhé, od Vložte >>> vybrať Modul .

Tu zadáme náš kód.

  • Po tretie, zadajte nasledujúci kód vo vnútri Modul .
 Sub Save_and_Close_Active_Workbook() ActiveWorkbook.Close SaveChanges:=True End Sub 

Rozdelenie kódu VBA

  • Po prvé, voláme našu Dílčí postup Save_and_Close_Active_Workbook .
  • Potom sa odvolávame na našu aktuálnu Pracovný zošit ako ActiveWorkbook .
  • Potom pomocou Zatvoriť metóda sme uzávierka náš súbor.
  • Nakoniec sme nastavili SaveChanges na Pravda , ktorá zachráni naše Pracovný zošit na stránke . uzávierka .

Teraz spustíme náš kód.

  • Po prvé, Uložiť tento Modul .
  • Po druhé, kliknite na náš kód.
  • Nakoniec stlačte tlačidlo Spustiť tlačidlo.

Ak pôjdeme do našej Aplikácia Excel , uvidíme naše Pracovný zošit je uzavretá. Úspešne sme teda uložené a zatvorené . Pracovný zošit pomocou Excel VBA .

Prečítajte si viac: Ako uložiť makro pre všetky zošity v programe Excel (s jednoduchými krokmi)

2. Excel VBA na uloženie a zatvorenie konkrétneho zošita

Pri druhej metóde použijeme uložiť a zavrieť konkrétny Pracovný zošit pomocou iného VBA kód. Tu sme otvorili dve Pracovné zošity a my budeme uložiť a zavrieť prvý Pracovný zošit z ľavej strany.

Kroky:

  • Po prvé, ako je uvedené v metóde 1 , vyvolajte Modul VBA .
  • Po druhé, zadajte tento kód vo vnútri Modul .
 Sub Save_and_Close_Specific_Workbook() Workbooks("Macro Save and Close.xlsm").Close SaveChanges:=True End Sub 

Rozdelenie kódu VBA

  • Po prvé, voláme našu Dílčí postup Save_and_Close_Specific_Workbook .
  • Potom sa odvolávame na náš prvý Pracovný zošit vo vnútri Objekt zošitov .
  • Potom pomocou Zatvoriť metóda sme uzávierka náš súbor.
  • Nakoniec sme nastavili SaveChanges na Pravda , ktorá zachráni naše Pracovný zošit na stránke . uzávierka .
  • Po tretie, ako je uvedené v metóde 1 , vykonajte kód.

Potom uvidíme, že prvý Pracovný zošit je . zatvorené a len druhý Pracovný zošit je . otvoriť Preto sme vám ukázali ďalšiu metódu ukladanie a uzávierka a Pracovný zošit .

Prečítajte si viac: Excel VBA: Uložiť hárok ako nový zošit bez otvorenia

3. Uloženie a zatvorenie konkrétneho zošita v konkrétnom priečinku

Pri tretej metóde budeme uložiť a zavrieť a špecifický pracovný zošit v priečinok pomocou Excel VBA .

Kroky:

  • Po prvé, ako je uvedené v metóde 1 , vyvolajte Modul VBA .
  • Po druhé, zadajte tento kód vo vnútri Modul .
 Sub Save_and_Close_Workbook_in_Specific_Folder() Workbooks("Macro Save and Close.xlsm").SaveAs _ Filename:="C:\Users\Rafi\OneDrive\Desktop\Exceldemy\Macro Save and Close.xlsm" Workbooks("Macro Save and Close.xlsm").Close End Sub 

Rozdelenie kódu VBA

  • Po prvé, voláme našu Dílčí postup Uložiť_a_zavrieť_zošit_v_konkrétnom_priečinku .
  • Potom pomocou SaveAs metóda sme ukladanie náš súbor na konkrétnom mieste.
  • Potom ponecháme názov súboru rovnaký ako pôvodný Pracovný zošit .
  • Nakoniec sme zavrieť naše Pracovný zošit .
  • Po tretie, ako je uvedené v metóde 1 , vykonajte kód.

Potom sa uložiť naše Pracovný zošit vnútri nášho definovaného umiestnenia priečinka a zavrieť Tak sme vám ukázali ďalšiu metódu ukladanie a zatvárací zošit v konkrétny priečinok pomocou VBA .

Prečítajte si viac: Makro Excel VBA na uloženie PDF do konkrétneho priečinka (7 ideálnych príkladov)

Podobné čítania

  • Excel VBA: Uloženie zošita bez výzvy (s jednoduchými krokmi)
  • [Opravené!] Prečo Excel neukladá moje formátovanie? (7 možných dôvodov)
  • Ako uložiť Excel ako PDF krajinu (s rýchlymi krokmi)
  • Excel VBA na uloženie ako súbor pomocou cesty z bunky (s rýchlymi krokmi)
  • [Opravené!] Súbor CSV programu Excel neukladá zmeny (6 možných riešení)

4. Vloženie tlačidla na uloženie a zatvorenie zošita v programe Excel

Pre štvrtú metódu vytvoríme Tlačidlo VBA na zatvorenie a uloženie zošita v programe Excel.

Kroky:

  • Po prvé, ako je uvedené v metóde 1 , vyvolajte Modul VBA .
  • Po druhé, zadajte tento kód vo vnútri Modul .
 Sub Button_Click_Save_and_Close_Workbook() ThisWorkbook.Save Application.Quit End Sub 

Rozdelenie kódu VBA

  • Po prvé, voláme našu Dílčí postup Tlačidlo_Click_Save_and_Close_Workbook .
  • Potom pomocou Uložiť metóda sme ukladanie náš pracovný zošit
  • Nakoniec sme zavrieť naše Pracovný zošit pomocou Ukončite metóda.

Teraz vložíme VBA tu.

  • Po prvé, z Vývojár karta>>> Vložte >>> vybrať Tlačidlo (Kontrola formulára) .

  • Potom sa kurzor myši zmení a pretiahne rámček vo vnútri Pracovný zošit .

Potom sa Dialógové okno Priradiť makro sa objaví.

  • Potom vyberte položku " Tlačidlo_Click_Save_and_Close_Workbook ".
  • Potom stlačte tlačidlo OK .

Potom uvidíme Tlačidlo 1 v Pracovný zošit .

  • Nakoniec kliknite na tlačidlo .

Tým sa uložiť a zavrieť naše Pracovný zošit .

Prečítajte si viac: Kód VBA pre tlačidlo Uložiť v programe Excel (4 varianty)

5. Uloženie a zatvorenie všetkých otvorených zošitov pomocou aplikácie Excel VBA

V tejto poslednej metóde uložíme a zatvoríme všetky otvorené Pracovné zošity Tentoraz máme tie isté dve Pracovné zošity ako v metóde 3 , tentoraz však budeme uložiť a zavrieť obidve Pracovné zošity . Tu použijeme slučka For Next prejsť cez naše Pracovné zošity .

Kroky:

  • Po prvé, ako je uvedené v metóde 1 , vyvolajte Modul VBA .
  • Po druhé, zadajte tento kód vo vnútri Modul .
 Sub CloseAndSaveOpenWorkbooks() Dim z As Workbook With Application For Each z In Workbooks With z If Not z.ReadOnly Then .Save End If If .Name ThisWorkbook.Name Then .Close End If End With Next z .Quit End With End Sub 

Rozdelenie kódu VBA

  • Po prvé, voláme našu Dílčí postup CloseAndSaveOpenWorkbooks .
  • Potom používame Pre ďalšiu slučku prechádzať všetky Pracovné zošity .
  • Potom pomocou Uložiť metóda sme ukladanie naše súbory.
  • Potom sme zavrieť všetky Pracovné zošity okrem našej aktuálnej Pracovný zošit .
  • Nakoniec máme zatvorené originál Pracovný zošit pomocou Ukončite nehnuteľnosť.
  • Po tretie, ako je uvedené v metóde 1 , vykonajte kód.

Preto bude uložiť a zavrieť dve Pracovné zošity . Môžeme vidieť dátum úpravy je rovnaká pre obe Pracovné zošity Na záver sme ukázali. 5 rôzne Makrá Excel VBA na uložiť a zatvoriť Pracovný zošit .

Prečítajte si viac: Ako uložiť makro do osobného zošita makier?

Záver

Ukázali sme vám 5 rýchle a jednoduché pochopenie Excel VBA na uložiť a zatvoriť Pracovný zošit Ak sa stretnete s akýmikoľvek problémami, neváhajte a vyjadrite sa nižšie. Okrem toho môžete navštíviť našu stránku Exceldemy pre viac Súvisiace s programom Excel články. Ďakujeme za čítanie, pokračujte v excelovaní!

Hugh West je veľmi skúsený tréner a analytik Excelu s viac ako 10-ročnými skúsenosťami v tomto odvetví. Má bakalársky titul v odbore účtovníctvo a financie a magisterský titul v odbore Business Administration. Hugh má vášeň pre vyučovanie a vyvinul jedinečný vyučovací prístup, ktorý sa dá ľahko sledovať a pochopiť. Jeho odborné znalosti Excelu pomohli tisíckam študentov a profesionálov na celom svete zlepšiť svoje zručnosti a vyniknúť vo svojej kariére. Hugh sa prostredníctvom svojho blogu delí o svoje znalosti so svetom a ponúka bezplatné výukové programy Excelu a online školenia, ktoré jednotlivcom a firmám pomôžu naplno využiť ich potenciál.