Excel VBA: Mentés és bezárás munkafüzet (5 megfelelő példa)

  • Ossza Meg Ezt
Hugh West

Ebben a cikkben megmutatjuk, hogy 5 felhasználási módszerek Excel VBA a címre. mentse és bezár Munkafüzet Mivel az idő nagyon értékes, sok időt takaríthatunk meg azzal, hogy a hétköznapi feladatokat kihagyjuk, ha a Excel VBA . Továbbá, vettünk egy adathalmazt, amely a következőkből áll 3 oszlop : " Név ", " Született ", és " Legújabb munkák ". Ez az adatkészlet a 6 az emberek születési éve és a legújabb filmadataik.

Gyakorlati munkafüzet letöltése

VBA a munkafüzet mentéséhez és bezárásához.xlsm

5 példa a munkafüzet mentésére és bezárására a VBA használatával az Excelben

1. Az aktív munkafüzet mentése és bezárása az Excel VBA használatával

Az első módszer esetében mentse és close a Aktív munkafüzet a használatával VBA makró Felhozzuk a VBA modul ablakban, írjuk be a kódunkat, majd hajtsuk végre a kódot, hogy elérjük a célunkat. Minden további nélkül ugorjunk bele a lépésről lépésre történő eljárásba.

Lépések:

Mielőtt, a kódunk beírása előtt fel kell hoznunk a VBA modul . Hogy ezt megtegyük...

  • Először is, a Fejlesztő tab>>>> select Visual Basic .

Alternatívaként megnyomhatja a ALT + F11 hogy ezt is megtegye. A " Microsoft Visual Basic alkalmazáshoz " jelenik meg ezután.

  • Másodszor, a Beillesztés >>>> select Modul .

Itt fogjuk beírni a kódunkat.

  • Harmadszor, írja be a következő kódot a Modul .
 Sub Save_and_Close_Active_Workbook() ActiveWorkbook.Close SaveChanges:=True End Sub 

VBA kód lebontása

  • Először is, hívjuk a Aleljárás Save_and_Close_Active_Workbook (Mentés_és_zárás_aktív_munkafüzet) .
  • Akkor, mi utalunk a jelenlegi Munkafüzet mint ActiveWorkbook .
  • Ezután a Zárja be a módszer vagyunk zárás a mi aktánk.
  • Végül, meghatároztuk SaveChanges a címre. Igaz , ami megmenti a Munkafüzet a oldalon. zárás .

Most pedig futtassuk le a kódunkat.

  • Először is, Mentés ez Modul .
  • Másodszor, kattintson a kódunk belsejébe.
  • Végül nyomja meg a Fuss gomb.

Ha elmegyünk a mi Excel alkalmazás , látni fogjuk a Munkafüzet zárt. Így sikeresen elértük, hogy mentett és zárt a Munkafüzet a használatával Excel VBA .

Bővebben: Hogyan menthet el egy makrót az Excel összes munkafüzetéhez (egyszerű lépésekkel)

2. Excel VBA az adott munkafüzet mentéséhez és bezárásához

A második módszerhez a mentse és close egy konkrét Munkafüzet egy másik VBA kód. Itt, mi nyitottunk két Munkafüzetek és mi mentse és close az első Munkafüzet a bal oldalról.

Lépések:

  • Először is, az 1. módszer szerint , hozza fel a VBA modul .
  • Másodszor, írja be ezt a kódot a Modul .
 Sub Save_and_Close_Specific_Workbook() Workbooks("Macro Save and Close.xlsm").Close SaveChanges:=True End Sub 

VBA kód lebontása

  • Először is, hívjuk a Aleljárás Save_and_Close_Specific_Workbook (Mentés_és_zárás_specifikus_Munkafüzet) .
  • Ezután, utalunk az első Munkafüzet a Munkafüzetek objektum .
  • Ezután a Zárja be a módszer vagyunk zárás a mi aktánkat.
  • Végül, meghatároztuk SaveChanges a címre. Igaz , ami megmenti a Munkafüzet a oldalon. zárás .
  • Harmadszor, az 1. módszer szerint , hajtsa végre a kódot.

Ezután látni fogjuk, hogy az első Munkafüzet a zárt és csak a második Munkafüzet a nyitott Ezért megmutattunk egy másik módszert, hogy mentés és zárás a Munkafüzet .

Bővebben: Excel VBA: Lap mentése új munkafüzetként megnyitás nélkül

3. Egy adott munkafüzet mentése és bezárása egy adott mappában

A harmadik módszerhez a következőket fogjuk alkalmazni mentse és close a specifikus munkafüzet egy mappa a használatával Excel VBA .

Lépések:

  • Először is, az 1. módszer szerint , hozza fel a VBA modul .
  • Másodszor, írja be ezt a kódot a 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 

VBA kód lebontása

  • Először is, hívjuk a Aleljárás Save_and_Close_Workbook_in_Specific_Folder (Mentés_és_Zárás_Munkafüzet_specifikus_mappában) .
  • Ezután a SaveAs módszer vagyunk mentés a fájlunkat egy adott helyen.
  • Ezután a fájlnevet megtartjuk az eredetivel megegyezően. Munkafüzet .
  • Végül, mi close a Munkafüzet .
  • Harmadszor, az 1. módszer szerint , hajtsa végre a kódot.

Ezt követően mentse a Munkafüzet a meghatározott mappánkban és close Így, mi megmutattunk egy másik módszert. mentés és záró munkafüzet egy meghatározott mappa a használatával VBA .

Bővebben: Excel VBA makró a PDF mentéséhez egy adott mappában (7 ideális példa)

Hasonló olvasmányok

  • Excel VBA: Munkafüzet mentése felszólítás nélkül (egyszerű lépésekkel)
  • [Javítva!] Miért nem menti el az Excel a formázásomat? (7 lehetséges ok)
  • Az Excel PDF tájként történő mentése (gyors lépésekkel)
  • Excel VBA a fájl mentéséhez a cellából származó útvonal használatával (gyors lépésekkel)
  • [Javítva!] Excel CSV fájl nem menti a változásokat (6 lehetséges megoldás)

4. Gomb beillesztése a munkafüzet mentéséhez és bezárásához az Excelben

A negyedik módszerhez létrehozunk egy VBA gomb a Munkafüzet bezárásához és mentéséhez az Excelben.

Lépések:

  • Először is, az 1. módszer szerint , hozza fel a VBA modul .
  • Másodszor, írja be ezt a kódot a Modul .
 Sub Button_Click_Save_and_Close_Workbook() ThisWorkbook.Save Application.Quit End Sub 

VBA kód lebontása

  • Először is, hívjuk a Aleljárás Button_Click_Save_and_Close_Workbook gomb_mentés_és_zárás_munkafüzet .
  • Ezután a Mentés módszer vagyunk mentés Munkafüzetünk
  • Végül, mi close a Munkafüzet a Kilépés módszer.

Most beillesztjük a VBA gombra itt.

  • Először is, a Fejlesztő tab>>>> Beillesztés >>>> select Gomb (Form Control) .

  • Ezután az egérkurzor megváltozik, és húzza egy dobozon belül a Munkafüzet .

Ezután a Makró hozzárendelése párbeszédpanel megjelenik.

  • Ezután válassza a " Button_Click_Save_and_Close_Workbook gomb_mentés_és_zárás_munkafüzet ".
  • Ezután nyomja meg a OK .

Aztán, látni fogjuk 1. gomb a Munkafüzet .

  • Végül kattintson a gombra.

Ez mentse és close a Munkafüzet .

Bővebben: VBA-kód az Excel mentési gombjához (4 változat)

5. Minden nyitott munkafüzet mentése és bezárása az Excel VBA alkalmazásával

Ebben az utolsó módszerben elmentjük és bezárjuk az összes megnyitott Munkafüzetek Ezúttal ugyanaz a két Munkafüzetek mint a módszerben 3 , azonban ezúttal mentse és close mindkettő Munkafüzetek Itt a a For Next ciklus hogy átmenjen a mi Munkafüzetek .

Lépések:

  • Először is, az 1. módszer szerint , hozza fel a VBA modul .
  • Másodszor, írja be ezt a kódot a 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 If .Name ThisWorkbook.Name Then .Close End If End With Next z .Quit End With End With End Sub 

VBA kód lebontása

  • Először is, hívjuk a Aleljárás CloseAndSaveOpenWorkbooks .
  • Ezután használunk egy For Következő ciklus az összes Munkafüzetek .
  • Ezután a Mentés módszer vagyunk mentés az aktáinkat.
  • Aztán, mi close az összes Munkafüzetek kivéve a jelenlegi Munkafüzet .
  • Végül, van zárt az eredeti Munkafüzet a Kilépés ingatlan.
  • Harmadszor, az 1. módszer szerint , hajtsa végre a kódot.

Ezért mentse és close a két Munkafüzetek Láthatjuk a módosítás dátuma ugyanaz a két Munkafüzetek Összefoglalva, kimutattuk, hogy 5 különböző Excel VBA makrók a címre. mentse és bezár Munkafüzet .

Bővebben: Hogyan menthetem a makrót a személyes makró munkafüzetbe?

Következtetés

Megmutattuk neked 5 gyorsan és könnyen érthető Excel VBA a címre. mentse és bezár Munkafüzet Ha bármilyen problémával szembesül, nyugodtan írja meg az alábbi megjegyzéseket. Továbbá, látogasson el oldalunkra Exceldemy tovább Excelhez kapcsolódó Köszönöm, hogy olvastál, továbbra is kiválóan teljesítesz!

Hugh West nagy tapasztalattal rendelkező Excel-oktató és elemző, több mint 10 éves tapasztalattal az iparágban. Számvitel és pénzügy szakos alapdiplomát, valamint üzleti adminisztrációból mesterképzést szerzett. Hugh szenvedélye a tanítás, és egyedülálló tanítási megközelítést dolgozott ki, amely könnyen követhető és érthető. Az Excelben szerzett szakértői tudása világszerte több ezer diáknak és szakembernek segített abban, hogy készségeiket és karrierjüket kiválóan teljesítsék. Hugh blogján keresztül megosztja tudását a világgal, ingyenes Excel-oktatóanyagokat és online képzéseket kínálva, hogy segítse az egyéneket és a vállalkozásokat teljes potenciáljuk kibontakoztatásában.