W tym artykule pokażemy Ci 5 metody stosowania Excel VBA do uratować oraz zamknij Workbook Ponieważ czas jest bardzo cenny, możemy go zaoszczędzić, pomijając przyziemne zadania, używając Excel VBA Ponadto, wzięliśmy zestaw danych składający się z 3 kolumny : " Nazwa ", " Urodzony ", oraz " Najnowsza praca ". Ten zbiór danych reprezentuje 6 rok urodzenia osób i ich ostatnie informacje filmowe.

Pobierz Zeszyt ćwiczeń

VBA do zapisywania i zamykania Workbook.xlsm

5 Przykłady zapisywania i zamykania skoroszytu za pomocą VBA w Excelu

1) Zapisywanie i zamykanie aktywnego skoroszytu za pomocą VBA programu Excel.

W przypadku pierwszej metody, będziemy uratować oraz zamknąć the Active Workbook używając Makro VBA . We will bring up the Moduł VBA okno, wpisujemy nasz kod, a następnie wykonujemy go, aby osiągnąć nasz cel. Bez dalszych ceregieli przeskoczmy do procedury krok po kroku.

Kroki:

Przed wpisaniem naszego kodu musimy wywołać Moduł VBA Aby to zrobić -

• Po pierwsze, z Deweloper tab>>> wybierz Visual Basic .

Alternatywnie można nacisnąć ALT + F11 aby to też zrobić. " Microsoft Visual Basic do stosowania " pojawi się po tej czynności.

• Po drugie, od Wkładka >>> wybierz Moduł .

Tutaj będziemy wpisywać nasz kod.

• Po trzecie, wpisz następujący kod wewnątrz Moduł .

 Sub Save_and_Close_Active_Workbook() ActiveWorkbook.Close SaveChanges:=True End Sub 

Podział kodu VBA

• Po pierwsze, nazywamy nasz Procedura cząstkowa Zapisz_i_zamknij_aktywny_książkę .
• Wtedy odnosimy się do naszego obecnego Workbook jako ActiveWorkbook .
• Następnie, używając Zamknij sposób jesteśmy zamknięcie nasze akta.
• Wreszcie, mamy ustawione SaveChanges do Prawdziwe który uratuje nasze Workbook na stronie zamknięcie .

Teraz zajmiemy się wykonaniem naszego kodu.

• Po pierwsze, Zapisz ten Moduł .
• Po drugie, kliknij wewnątrz naszego kodu.
• Na koniec naciśnij przycisk Uruchom przycisk.

Jeśli pójdziemy do naszego Aplikacja Excel zobaczymy nasze Workbook jest zamknięty, a więc mamy pomyślnie zapisane oraz zamknięta the Workbook używając Excel VBA .

Read More: Jak zapisać Makro dla wszystkich skoroszytów w Excelu (z prostymi krokami)

2) Excel VBA do zapisywania i zamykania określonego skoroszytu

Dla drugiej metody użyjemy uratować oraz zamknąć specyficzny Workbook przy użyciu innego VBA Kod. Tutaj, otworzyliśmy dwa Workbooks i będziemy uratować oraz zamknąć pierwszy Workbook z lewej strony.

Kroki:

• Po pierwsze, jak pokazano w metodzie 1 , podnieść Moduł VBA .
• Po drugie, wpisz ten kod wewnątrz tego Moduł .

 Sub Save_and_Close_Specific_Workbook() Workbooks("Makro Save and Close.xlsm").Close SaveChanges:=True End Sub 

Podział kodu VBA

• Po pierwsze, nazywamy nasz Procedura cząstkowa Zapisz_i_zamknij_specyficzny_książkę_zbiorczą .
• Następnie odnosimy się do naszego pierwszego Workbook wewnątrz Obiekt Workbooks .
• Następnie, używając Zamknij sposób jesteśmy zamknięcie nasze akta.
• Wreszcie, mamy ustawione SaveChanges do Prawdziwe który uratuje nasze Workbook na stronie zamknięcie .

• Po trzecie, jak pokazano w metodzie 1 , wykonaj kod.

Po tym zobaczymy, że pierwszy Workbook jest zamknięta i dopiero drugi Workbook jest otwórz Dlatego pokazaliśmy wam jeszcze jedną metodę oszczędzanie oraz zamknięcie a Workbook .

Read More: Excel VBA: Zapisz arkusz jako nowy skoroszyt bez otwierania

Zapisz i zamknij określony skoroszyt w określonym folderze

W przypadku trzeciej metody, zamierzamy uratować oraz zamknąć a specyficzny Workbook w folder używając Excel VBA .

Kroki:

• Po pierwsze, jak pokazano w metodzie 1 , podnieść Moduł VBA .
• Po drugie, wpisz ten kod wewnątrz tego Moduł .

Podział kodu VBA

• Po pierwsze, nazywamy nasz Procedura cząstkowa Zapisz_i_zamknij_książkę_w_określonym_folderze .
• Następnie, używając SaveAs sposób jesteśmy oszczędzanie nasz plik w określonej lokalizacji.
• Następnie zachowujemy nazwę pliku taką samą jak oryginalna Workbook .
• Wreszcie, my zamknąć nasz Workbook .

• Po trzecie, jak pokazano w metodzie 1 , wykonaj kod.

Po tym, będzie to uratować nasz Workbook wewnątrz zdefiniowanej przez nas lokalizacji folderu i zamknąć Tak więc, pokazaliśmy wam inną metodę oszczędzanie oraz zamknięcie Workbook w konkretny folder używając VBA .

Read More: Excel VBA Makro do zapisywania PDF w określonym folderze (7 idealnych przykładów)

Podobne lektury

• Excel VBA: Zapisz Workbook bez zachęty (z łatwymi krokami)
• [Dlaczego Excel nie zapisuje mojego formatowania (7 możliwych przyczyn)?
• Jak zapisać Excel jako PDF Krajobraz (z szybkich kroków)
• Excel VBA, aby zapisać jako plik przy użyciu ścieżki z komórki (z szybkimi krokami)
• [Fixed!] Excel CSV File Not Saving Changes (6 Possible Solutions)

4. wstawianie przycisku do zapisywania i zamykania skoroszytu w Excelu

Dla czwartej metody, stworzymy Przycisk VBA aby zamknąć i zapisać Workbook w Excelu.

Kroki:

• Po pierwsze, jak pokazano w metodzie 1 , podnieść Moduł VBA .
• Po drugie, wpisz ten kod wewnątrz tego Moduł .

 Sub Button_Click_Save_and_Close_Workbook() ThisWorkbook.Save Application.Quit End Sub 

Podział kodu VBA

• Po pierwsze, nazywamy nasz Procedura cząstkowa Button_Click_Save_and_Close_Workbook .
• Następnie, używając Zapisz sposób jesteśmy oszczędzanie nasz Workbook
• Wreszcie, my zamknąć nasz Workbook używając Zakończ metoda.

Teraz wstawimy VBA tutaj.

• Po pierwsze, z Deweloper tab>>> Wkładka >>> wybierz Przycisk (Form Control) .

• Następnie kursor myszy zmieni się i przeciągnie pole wewnątrz Workbook .

Następnie. Okno dialogowe Przypisz makro pojawi się.

• Następnie należy wybrać " Button_Click_Save_and_Close_Workbook ".
• Następnie należy nacisnąć OK .

Wtedy zobaczymy Przycisk 1 w Workbook .

• Na koniec kliknij na przycisk.

To będzie uratować oraz zamknąć nasz Workbook .

Read More: Kod VBA dla przycisku Zapisz w Excelu (4 warianty)

5) Zapisywanie i zamykanie wszystkich otwartych skoroszytów z zastosowaniem VBA programu Excel

W tej ostatniej metodzie, zapiszemy i zamkniemy wszystkie otwarte Workbooks Tym razem mamy te same dwa Workbooks jak w metodzie 3 ale tym razem, będziemy uratować oraz zamknąć zarówno Workbooks Tutaj użyjemy pętla For Next aby przejść przez naszą Workbooks .

Kroki:

• Po pierwsze, jak pokazano w metodzie 1 , podnieść Moduł VBA .
• Po drugie, wpisz ten kod wewnątrz tego Moduł .

 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 Sub 

Podział kodu VBA

• Po pierwsze, nazywamy nasz Procedura cząstkowa CloseAndSaveOpenWorkbooks .
• Następnie używamy For Next Loop aby przejść przez wszystkie Workbooks .
• Następnie, używając Zapisz sposób jesteśmy oszczędzanie nasze pliki.
• Następnie, my zamknąć cały Workbooks oprócz naszego obecnego Workbook .
• W końcu mamy zamknięta oryginał Workbook używając Zakończ nieruchomość.

• Po trzecie, jak pokazano w metodzie 1 , wykonaj kod.

Dlatego też uratować oraz zamknąć dwa Workbooks . Możemy zobaczyć data modyfikacji jest taka sama dla dwóch Workbooks Podsumowując, wykazaliśmy 5 różne Makra VBA w programie Excel do uratować oraz zamknij Workbook .

Read More: Jak zapisać makro do osobistego skoroszytu?

Wniosek

Pokazaliśmy ci 5 szybki i łatwy do zrozumienia Excel VBA do uratować oraz zamknij Workbook Jeśli napotkasz jakiekolwiek problemy, nie krępuj się komentować poniżej. Ponadto, możesz odwiedzić naszą stronę Exceldemy dla więcej związane z programem Excel artykuły. dzięki za przeczytanie, kontynuuj doskonalenie!