Ważne informacje przechowujemy w Excel Wykonujemy również różne operacje w zależności od potrzeb. Konieczne jest więc zapisanie pliku po jego aktualizacji. W przeciwnym razie możemy stracić cenne dane. Istnieje kilka skutecznych sposobów, aby Zapisz an Excel Workbook Ponadto, oszczędzanie Excel plik zgodnie z naszym życzeniem Format lub zapisanie pliku w wybranym Lokalizacja W tym artykule pokażemy Ci najbardziej przydatne przykłady Excel VBA Zapisz jako format pliku .

Pobierz Zeszyt ćwiczeń

Pobierz poniższy zeszyt ćwiczeń do samodzielnego przećwiczenia.

12 Przykładów Excel VBA Zapisz jako format pliku

Dla ilustracji posłużymy się następującym zbiorem danych. Przykładowo, zbiór ten reprezentuje Sprzedawca , Produkt oraz Sprzedaż netto firmy. Tutaj zapiszemy ten skoroszyt, stosując Excel VBA Zapisz jako format pliku .

1. VBA do zapisywania jako plik Excel

W naszym pierwszym przykładzie pokażemy prosty Kod VBA zapisać Excel Dlatego wykonaj poniższe kroki, aby wykonać to zadanie.

KROKI:

• Po pierwsze, przejdź do Zakładka Deweloper.
• Następnie należy wybrać Visual Basic .

• W związku z tym VBA pojawi się okno.
• Następnie należy kliknąć Wkładka .
• Następnie należy wybrać Moduł .

• W związku z tym Moduł pojawi się okno.
• Następnie skopiuj poniższy kod i wklej go w pole.

 Sub Przykład_1() ActiveWorkbook.SaveAs End Sub 

• Teraz uruchom kod, naciskając F5 .
• W związku z tym będziesz musiał wprowadzić nazwę pliku, format i inne informacje zgodnie z wymaganiami.
• Na koniec zapisze plik w określonej przez ciebie lokalizacji.

Read More: Jak zapisać arkusz jako nowy plik za pomocą programu Excel VBA

2) Określenie rozszerzenia pliku za pomocą programu Excel VBA

W poprzednim przykładzie, musieliśmy ręcznie określić Format pliku po naciśnięciu polecenia uruchom. Ale tutaj pokażemy bardziej efektywny sposób zastosowania Excel VBA Zapisz jako format pliku aby zapisać skoroszyt w wybranym formacie. Wystarczy, że po nazwie pliku podamy jego rozszerzenie. Zatem poniższy kod wstawiamy do Moduł okno.

 Sub Example_2() Dim location As String location = "D:\Nexcel vba zapisz jako format pliku.xlsm" ActiveWorkbook.SaveAs Filename:=location End Sub. 

W ten sposób można uruchomić kod, aby uzyskać plik w żądanym formacie i lokalizacji.Aby zapisać plik w formacie xlsx, typ xlsx w miejsce xlsm .

Czytaj więcej: Excel VBA Makro, aby zapisać PDF w określonym folderze (7 idealnych przykładów)

3) Excel VBA, aby użyć kodu formatu pliku

Możemy jednak wprowadzić Format pliku Numer kodu zamiast podawania rozszerzenia pliku. Niektóre przydatne kody to: .xlsx = 51 , . xlsm = 52 , .xlsb = 50 , .xls = 56 . Stąd należy skopiować poniższy kod i wkleić go do Moduł pudełko.

 Sub Example_3() Dim location As String location = "D:\Nexcel vba zapisz jako format pliku" ActiveWorkbook.SaveAs Filename:=location, FileFormat:=52 End Sub 

Read More: [Dlaczego Excel nie zapisuje mojego formatowania (7 możliwych przyczyn)?

4. zapis w tym samym katalogu za pomocą VBA

W tym przykładzie pokażemy, jak Zapisz w Ten sam katalog gdzie plik już jest z Excel VBA Dlatego wstaw kod do Moduł okno.

 Sub Example_4() ActiveWorkbook.SaveAs Filename:="excel vba zapisz jako format pliku" End Sub 

Read More: Excel VBA: Wybierz lokalizację i zapisz jako PDF

5. VBA do przechowywania w nowym katalogu

Jednak możemy również potrzebować zapisać plik w Nowy katalog W związku z tym wpisz następujący kod w Moduł i uruchomić go.

 Sub Example_5() Dim location As String location = "D:\Nexcel vba zapisz jako format pliku" ActiveWorkbook.SaveAs Filename:=location End Sub 

6. pytanie o hasło do otwarcia pliku Excela

Dodatkowo można zastosować Excel VBA Zapisz jako format pliku prosić o Hasło do Otwórz plik Excela . więc wstaw i uruchom poniższy kod.

 Sub Example_6() ActiveWorkbook.SaveAs _ Filename:="D:\Nexcel vba zapisz jako format pliku.xlsm", Password:="one" End Sub. 

Read More: Jak zapisać plik Excela z hasłem

Podobne lektury

• Excel VBA, aby zapisać plik ze zmienną nazwą (5 przykładów)
• 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)
• Kod VBA dla przycisku Zapisz w Excelu (4 warianty)
• [Fixed!] Excel CSV File Not Saving Changes (6 Possible Solutions)

7) Dodaj hasło do edycji w programie Excel

Ponadto można poprosić o. Hasło dla Edycja w Excel . Bez hasła otworzy się tylko w formacie tylko do odczytu. Skopiuj kod i wklej go, a następnie uruchom kod.

 Sub Example_7() ActiveWorkbook.SaveAs _ Filename:="D:\"excel vba zapisz jako format pliku.xlsm", WriteRes:="one" End Sub. 

8. otworzyć w formacie tylko do odczytu

Ponownie, dla otwarcia pliku w Tylko do odczytu Format , wpisz poniższy kod i naciśnij F5 aby go uruchomić.

 Sub Example_8() ActiveWorkbook.SaveAs _ Filename:="D:\Nexcel vba zapisz jako format pliku.xlsm", _ ReadOnlyRecommended:=True End Sub. 

Read More: Jak otworzyć dokument Word i zapisać go jako PDF lub Docx za pomocą VBA Excel

9) Wygeneruj okno dialogowe "Zapisz jako".

Kolejna przydatna operacja Excel VBA do zapisywania jako format pliku jest generowanie Okno dialogowe Zapisz jako . Stąd też należy wstawić poniższy kod.

 Sub Example_9() Application.GetSaveAsFilename End Sub 

Read More: Makro Excel, aby zapisać jako PDF (5 odpowiednich przykładów)

10. VBA do tworzenia iamp; Zapisz nowy skoroszyt

Oprócz zapisania pliku możemy również Utwórz & Zapisz nowy skoroszyt z VBA Aby wykonać zadanie należy wpisać poniższy kod w Moduł i naciśnij F5 .

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

Czytaj więcej: Excel VBA: Zapisz arkusz jako nowy skoroszyt bez otwierania

Zapisz aktywny skoroszyt w programie Excel

Podobnie możemy zapisać aktywny skoroszyt w miejscu, w którym już się znajduje. Aby wykonać operację, należy wstawić bardzo prosty kod.

 Sub Przykład_11() ActiveWorkbook.Save End Sub 

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

12. VBA do zapisywania w formacie PDF w Excelu

Wreszcie możemy użyć PDF rozszerzenie pliku w naszym VBA kod do zapisania w Format PDF . So, apply Excel VBA Zapisz jako format pliku Następnie uruchom kod naciskając F5 .

 Sub Przykład_12() ActiveSheet.SaveAs Filename:="excel vba zapisz jako format pliku.pdf" End Sub 

Read More: Jak zapisać program Excel jako PDF (6 przydatnych sposobów)

Wniosek

Od tej pory będzie można zapisywać pliki z Excel VBA Zapisz jako format pliku na podstawie opisanych powyżej przykładów.Korzystaj z nich i daj nam znać, jeśli masz więcej sposobów na wykonanie zadania.Śledź ExcelWIKI Nie zapomnij upuścić komentarzy, sugestii lub zapytań, jeśli masz jakieś w sekcji komentarzy poniżej.