Fontos információkat tárolunk a Excel Különböző műveleteket is végzünk az igényeinknek megfelelően. Ezért szükséges, hogy a fájlt elmentsük, miután frissítettük. Ellenkező esetben elveszíthetünk néhány értékes adatot. Van néhány hatékony módja annak, hogy Mentés egy Excel munkafüzet Ráadásul a mentés egy Excel fájl a kívánt Formátum , vagy a fájl tárolása a kívánt Helyszín Ebben a cikkben megmutatjuk a leghasznosabb példákat a Excel VBA mentése fájlformátumként .

Gyakorlati munkafüzet letöltése

Töltse le az alábbi munkafüzetet, hogy saját maga gyakorolhasson.

12 példa az Excel VBA mentési fájlformátumára

Az illusztrációhoz a következő adathalmazt használjuk példaként. Az adathalmaz például az alábbiakat ábrázolja Értékesítő , Termék , és Nettó értékesítés Itt elmentjük ezt a munkafüzetet, alkalmazva a Excel VBA mentése fájlformátumként .

1. VBA az Excel-fájlként való mentéshez

Az első példánkban egy egyszerű VBA kód menteni egy Excel Ezért kövesse az alábbi lépéseket a feladat elvégzéséhez.

LÉPÉSEK:

• Először is, menjen a Fejlesztő fül.
• Ezután válassza a Visual Basic .

• Ennek eredményeként a VBA ablak fog felugrani.
• Ezután kattintson a Beillesztés .
• Ezt követően válassza ki a Modul .

• Ezért a Modul ablak jelenik meg.
• Ezután másolja ki az alábbi kódot, és illessze be a mezőbe.

 Sub Example_1() ActiveWorkbook.SaveAs End Sub 

• Most futtassa a kódot a F5 .
• Következésképpen be kell adnia a fájl nevét, formátumát és egyéb információkat a kérésnek megfelelően.
• Végül pedig elmenti a fájlt a megadott helyre.

Bővebben: Hogyan menthet egy munkalapot új fájlként az Excel VBA használatával

2. Fájlkiterjesztés megadása Excel VBA-val

Az előző példában manuálisan kellett megadnunk a Fájlformátum miután megnyomta a run parancsot. De itt megmutatunk egy hatékonyabb módot arra, hogy a Excel VBA mentése fájlformátumként hogy a munkafüzeteket a kívánt formátumban mentsük el. Egyszerűen csak megadjuk a fájlkiterjesztést a fájlnév után. Tehát, illesszük be az alábbi kódot a Modul ablak.

 Sub Example_2() Dim location As String location = "D:\SOFTEKO\excel vba save as file format.xlsm" ActiveWorkbook.SaveAs Filename:=location End Sub 

Ily módon futtathatja a kódot, hogy a kívánt formátumú és helyű fájlt kapja meg. mentse a fájlt xlsx formátumban, típus xlsx a következők helyett xlsm .

További információ: Excel VBA makró a PDF mentéséhez egy adott mappába (7 ideális példa)

3. Excel VBA a fájlformátum kód használatához

Azonban beírhatjuk a Fájlformátum kódszám a fájlkiterjesztés megadása helyett. Néhány hasznos kód: .xlsx = 51 , . xlsm = 52 , .xlsb = 50 , .xls = 56 . másolja ki a következő kódot, és illessze be a Modul doboz.

 Sub Example_3() Dim location As String location = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=location, FileFormat:=52 End Sub 

Bővebben: [Javítva!] Miért nem menti el az Excel a formázásomat? (7 lehetséges ok)

4. Mentés ugyanabba a könyvtárba VBA-val

Ebben a példában azt mutatjuk be, hogyan lehet Mentés a Ugyanaz a könyvtár ahol a fájl már a Excel VBA Ezért illessze be a kódot a Modul ablak.

 Sub Example_4() ActiveWorkbook.SaveAs Filename:="excel vba save as file format" End Sub 

Bővebben: Excel VBA: Hely kiválasztása és PDF-ként történő mentés

5. VBA az új könyvtárban való tároláshoz

Azonban az is előfordulhat, hogy a fájlt el kell mentenünk a Új könyvtár Így írja be a következő kódot a Modul dobozba, és futtassa le.

 Sub Example_5() Dim location As String location = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=location End Sub 

6. Kérjen jelszót az Excel fájl megnyitásához

Ezenkívül alkalmazhatja Excel VBA mentése fájlformátumként hogy kérjen egy Jelszó a címre. Excel fájl megnyitása Szúrja be és futtassa az alábbi kódot.

 Sub Example_6() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", Password:="one" End Sub 

Bővebben: Hogyan menthetjük az Excel fájlt jelszóval

Hasonló olvasmányok

• Excel VBA a fájl mentéséhez változó névvel (5 példa)
• 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)
• VBA-kód az Excel mentési gombjához (4 változat)
• [Javítva!] Excel CSV fájl nem menti a változásokat (6 lehetséges megoldás)

7. Jelszó hozzáadása az Excelben történő szerkesztéshez

Ezenkívül kérhet egy Jelszó a oldalon. Szerkesztés a oldalon. Excel A jelszó nélkül csak olvasható formátumban fog megnyílni. Másolja ki a kódot és illessze be, majd futtassa le.

 Sub Example_7() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", WriteRes:="one" End Sub 

8. Megnyitás csak olvasható formátumban

Ismét egy fájl megnyitásához a Csak olvasható formátum , írja be az alábbi kódot és nyomja meg a F5 a futtatásához.

 Sub Example_8() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", _ ReadOnlyRecommended:=True End Sub 

Bővebben: Hogyan nyissa meg a Word dokumentumot és mentse PDF vagy Docx formátumban a VBA Excel segítségével?

9. "Mentés másként" párbeszédpanel létrehozása

Egy másik hasznos művelet a Excel VBA a fájlformátum mentéséhez az, hogy generáljon Mentés másként párbeszédpanel Ezért illessze be az alábbi kódot.

 Sub Example_9() Application.GetSaveAsFilename End Sub 

Bővebben: Excel makró a PDF mentéséhez (5 megfelelő példa)

10. VBA új munkafüzet létrehozásához és mentéséhez

A fájl mentésén kívül a következő lehetőségekkel is élhetünk Új munkafüzet létrehozása és mentése a címen VBA A feladat elvégzéséhez írja be az alábbi kódot a Modul ablakot, és nyomja meg a F5 .

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

További információ: Excel VBA: Lap mentése új munkafüzetként megnyitás nélkül

11. Aktív munkafüzet mentése az Excelben

Hasonlóképpen elmenthetjük az aktív munkafüzetet, ahol már tárolva van. A művelet végrehajtásához illesszük be a nagyon egyszerű kódot.

 Sub Example_11() ActiveWorkbook.Save End Sub 

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

12. VBA a PDF formátumú mentéshez Excelben

Végül használhatjuk a PDF fájlkiterjesztés a VBA kódot menteni a PDF formátum Tehát, alkalmazza Excel VBA mentése fájlformátumként Ezután futtassa a kódot a F5 .

 Sub Example_12() ActiveSheet.SaveAs Filename:="excel vba save as file format.pdf" End Sub 

Bővebben: Az Excel PDF-ként történő mentése (6 hasznos módja)

Következtetés

Mostantól kezdve a fájlokat a következőkkel mentheti el Excel VBA mentése fájlformátumként a fent leírt példákat követve. Használja őket továbbra is, és tudassa velünk, ha további módjai vannak a feladat elvégzésére. Follow az ExcelWIKI Ne felejtsd el, hogy az alábbi megjegyzések, javaslatok, vagy kérdések, ha van ilyen, az alábbi megjegyzés rovatban.