Excel VBA: Salvați și închideți registrul de lucru (5 exemple adecvate)

Hugh West

03-10-2023 Macros & Excel VBA
  • Imparte Asta
Hugh West

În acest articol, vă vom arăta 5 metode de utilizare Excel VBA la salvați și închideți caietul de lucru Deoarece timpul este foarte prețios, putem economisi mult timp sărind peste sarcinile banale folosind Excel VBA În plus, am luat un set de date format din 3 coloane : " Nume ", " Născut ", și " Cea mai recentă lucrare ". Acest set de date reprezintă 6 anul de naștere al persoanelor și cele mai recente informații despre filmul lor.

Descărcați caietul de practică

VBA pentru a salva și închide registrul de lucru.xlsm

5 Exemple de salvare și închidere a unui registru de lucru utilizând VBA în Excel

1. Salvați și închideți registrul de lucru activ utilizând Excel VBA

Pentru prima metodă, vom salvați și închideți la Caiet de lucru activ folosind Macro VBA . vom aduce în discuție Modul VBA să tastăm codul nostru și apoi să executăm codul pentru a ne atinge obiectivul. Fără alte comentarii, să trecem la procedura pas cu pas.

Pași:

Înainte de a tasta codul nostru, trebuie să aducem la suprafață Modul VBA Pentru a face asta...

  • În primul rând, de la Dezvoltator tab>>> selectați Visual Basic .

Alternativ, puteți apăsa ALT + F11 pentru a face și acest lucru. Microsoft Visual Basic pentru aplicație " va apărea după aceasta.

  • În al doilea rând, din Introduceți >>>> selectați Modul .

Aici, vom introduce codul nostru.

  • În al treilea rând, tastați următorul cod în interiorul fișierului Modul . 
 Sub Save_and_Close_Active_Workbook() ActiveWorkbook.Close SaveChanges:=True End Sub

Defalcarea codului VBA

  • În primul rând, apelăm la Subprocedură Salvează_și_închide_carte_de_lucru_activă .
  • Apoi, ne referim la curentul nostru Caietul de lucru ca ActiveWorkbook .
  • După aceea, folosind Închideți metoda suntem închidere dosarul nostru.
  • În cele din urmă, am stabilit SaveChanges la Adevărat , care ne va salva Caietul de lucru pe închidere .

Acum, vom executa codul nostru.

  • În primul rând, Salvați acest Modul .
  • În al doilea rând, faceți clic în interiorul codului nostru.
  • În cele din urmă, apăsați butonul Rulați buton.

Dacă mergem la Aplicație Excel , vom vedea Caietul de lucru este închisă. Astfel, am reușit salvat și închisă la Caietul de lucru folosind Excel VBA .

Citește mai mult: Cum să salvați un macro pentru toate registrele de lucru din Excel (cu pași simpli)

2. Excel VBA pentru a salva și închide un registru de lucru specific

Pentru a doua metodă, vom folosi salvați și închideți un anumit Caietul de lucru folosind un alt VBA Aici, am deschis două Caiete de lucru și noi vom salvați și închideți primul Caietul de lucru din partea stângă.

Pași:

  • În primul rând, așa cum se arată în metoda 1 , aduceți la suprafață Modul VBA .
  • În al doilea rând, tastați acest cod în interiorul acelui Modul . 
 Sub Save_and_Close_Specific_Workbook() Workbooks("Macro Save and Close.xlsm").Close SaveChanges:=True End Sub

Defalcarea codului VBA

  • În primul rând, apelăm la Subprocedură Salvează_și_închide_un_carnet_de_lucru_specific .
  • Apoi, ne referim la primul nostru Caietul de lucru în interiorul Obiect registru de lucru .
  • După aceea, folosind Închideți metoda suntem închidere dosarul nostru.
  • În cele din urmă, am stabilit SaveChanges la Adevărat , care ne va salva Caietul de lucru pe închidere .
  • În al treilea rând, așa cum se arată în metoda 1 , executați codul.

După aceasta, vom vedea că primul Caietul de lucru este închisă și doar al doilea Caietul de lucru este deschis Prin urmare, v-am arătat o altă metodă de a salvare și închidere a Caietul de lucru .

Citește mai mult: Excel VBA: Salvați foaia ca registru de lucru nou fără deschidere

3. Salvați și închideți registrul de lucru specific în folderul specific

Pentru cea de-a treia metodă, vom salvați și închideți a caiet de lucru specific într-o dosar folosind Excel VBA .

Pași:

  • În primul rând, așa cum se arată în metoda 1 , aduceți la suprafață Modul VBA .
  • În al doilea rând, tastați acest cod în interiorul acelui 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

Defalcarea codului VBA

  • În primul rând, apelăm la Subprocedură Salvează și închide registrul de lucru în folderul specific .
  • După aceea, folosind Salvează ca metoda suntem salvare fișierul nostru într-o anumită locație.
  • Apoi, păstrăm numele fișierului la fel ca originalul Caietul de lucru .
  • În cele din urmă, noi închideți nostru Caietul de lucru .
  • În al treilea rând, așa cum se arată în metoda 1 , executați codul.

După aceasta, se va salvați nostru Caietul de lucru în interiorul folderului nostru definit ca locație și închideți Astfel, v-am arătat o altă metodă de a salvare și caiet de lucru de închidere într-o dosar specific folosind VBA .

Citește mai mult: Excel VBA Macro pentru a salva PDF în folderul specific (7 exemple ideale)

Lecturi similare

  • Excel VBA: Salvați registrul de lucru fără o invitație (cu pași simpli)
  • [Fixed!] De ce nu-mi salvează Excel formatarea (7 motive posibile)
  • Cum să salvați Excel ca peisaj PDF (cu pași rapizi)
  • Excel VBA pentru a salva ca fișier utilizând calea din celulă (cu pași rapizi)
  • [Fix!] Fișierul Excel CSV nu salvează modificările (6 Soluții posibile)

4. Inserarea butonului de salvare și închidere a unui registru de lucru în Excel

Pentru cea de-a patra metodă, vom crea un fișier Buton VBA pentru a închide și salva registrul de lucru în Excel.

Pași:

  • În primul rând, așa cum se arată în metoda 1 , aduceți la suprafață Modul VBA .
  • În al doilea rând, tastați acest cod în interiorul acelui Modul . 
 Sub Button_Click_Save_and_Close_Workbook() ThisWorkbook.Save Application.Quit End Sub

Defalcarea codului VBA

  • În primul rând, apelăm la Subprocedură Buton_Click_Salvare_și_Închidere_Carte_de_lucru .
  • După aceea, folosind Salvați metoda suntem salvare caietul nostru de lucru
  • În cele din urmă, noi închideți nostru Caietul de lucru folosind Renunță la metoda.

Acum, vom introduce VBA aici.

  • În primul rând, de la Dezvoltator tab>>> Introduceți >>>> selectați Buton (Controlul formularului) .

  • Apoi, cursorul mouse-ului se va schimba și va trage o cutie în interiorul Caietul de lucru .

După aceea, se va trece la Caseta de dialog Atribuire macro va apărea.

  • Apoi, selectați " Buton_Click_Salvare_și_Închidere_Carte_de_lucru ".
  • După aceea, apăsați OK .

Apoi, vom vedea Butonul 1 în Caietul de lucru .

  • În cele din urmă, faceți clic pe buton.

Acest lucru va salvați și închideți nostru Caietul de lucru .

Citește mai mult: Cod VBA pentru butonul Salvare în Excel (4 variante)

5. Salvați și închideți toate registrele de lucru deschise aplicând Excel VBA

În această ultimă metodă, vom salva și închide toate aplicațiile deschise. Cărți de lucru De data aceasta, avem aceleași două Cărți de lucru ca în metoda 3 , însă, de data aceasta, vom salvați și închideți ambele Caiete de lucru Aici, vom folosi bucla For Next să treacă prin Cărți de lucru .

Pași:

  • În primul rând, așa cum se arată în metoda 1 , aduceți la suprafață Modul VBA .
  • În al doilea rând, tastați acest cod în interiorul acelui Modul . 
 Sub CloseAndSaveOpenWorkbooks() Dim z As Workbook With Application For Each z In Workbooks With z If Not z.ReadOnly Then .Save End If .Name ThisWorkbook.Name Then .Close End If End With Next z .Quit End With End With End With End Sub

Defalcarea codului VBA

  • În primul rând, apelăm la Subprocedură CloseAndSaveOpenWorkbooks .
  • Apoi, folosim un Pentru următoarea buclă pentru a parcurge toate Cărți de lucru .
  • După aceea, folosind Salvați metoda suntem salvare dosarele noastre.
  • Apoi, noi închideți toate Cărți de lucru cu excepția curentului nostru Caietul de lucru .
  • În cele din urmă, avem închisă originalul Caietul de lucru folosind Renunță la proprietate.
  • În al treilea rând, așa cum se arată în metoda 1 , executați codul.

Prin urmare, acesta va salvați și închideți cele două Cărți de lucru . putem vedea data modificării este aceeași pentru cele două Cărți de lucru În concluzie, am arătat că 5 diferite Macros Excel VBA la salvați și închideți caietul de lucru .

Citește mai mult: Cum se salvează macroul în registrul de lucru macro personal?

Concluzie

V-am arătat 5 rapid și ușor de înțeles Excel VBA la salvați și închideți caietul de lucru Dacă întâmpinați orice problemă, nu ezitați să comentați mai jos. În plus, puteți vizita site-ul nostru. Exceldemy pentru mai mult Legat de Excel Mulțumesc pentru lectură, continuă să excelezi!

Postarea anterioară Cum să combinați două rânduri în Excel (4 moduri simple)
Postarea următoare Cum să reîmprospătați automat foaia Excel (3 metode adecvate)

Hugh West este un trainer și analist Excel cu o experiență de peste 10 ani în industrie. Deține o diplomă de licență în contabilitate și finanțe și un master în administrarea afacerilor. Hugh are o pasiune pentru predare și a dezvoltat o abordare unică de predare care este ușor de urmărit și de înțeles. Cunoștințele sale experte despre Excel au ajutat mii de studenți și profesioniști din întreaga lume să-și îmbunătățească abilitățile și să exceleze în cariera lor. Prin blogul său, Hugh își împărtășește cunoștințele lumii, oferind tutoriale gratuite Excel și instruire online pentru a ajuta persoanele și companiile să-și atingă întregul potențial.