Ebben a cikkben megmutatom, hogyan nyomtathat bármilyen dokumentumot PDF-be a következő eszközökkel VBA Az Excelben a ExportAsFixedForma t módszer VBA A módszer minden paraméterét megfelelő példákkal és illusztrációkkal fogom tárgyalni.

Nyomtatás PDF-be az Excel VBA-ban (gyorsnézet)

Gyakorlati munkafüzet letöltése

Töltse le ezt a gyakorlati munkafüzetet, hogy gyakorolhasson, miközben ezt a cikket olvassa.

Bevezetés az ExportAsFixedFormat utasításhoz

⧭ Áttekintés:

A ExportAsFixedForma t módszer VBA bármely adott dokumentumot PDF formátumban ment el egy adott névvel a következővel VBA Ez egy nagyon hasznos módszer azok számára, akik sok Excel-munkalapot használnak, és azokat későbbi felhasználásra tárolják.

⧭ Szintaxis:

A VBA szintaxis ExportAsFixedFormat módszer:

 Document.ExportAsFixedFormat Type, Filename, Quality, IncludeDocProperties, IgnorePrintAreas, From, To, OpenAfterPublish 

⧭ Paraméterek:

⧭ Visszatérési érték:

Az Excel munkafüzet munkalapjait PDF-dokumentummá alakítja, és a megadott névvel a megadott mappába menti.

5 példa a PDF nyomtatására az Excel VBA-ban az ExportAsFixedFormat kijelentéssel

Nézzünk meg néhány példát arra, hogyan nyomtathatunk PDF-be egy dokumentumot az Excelben. VBA a ExportAsFixedFormat módszer.

Példa 1: Nyomtatás PDF-be az Excel VBA-ban név vagy útvonal megadása nélkül

Itt van egy munkalap a Marin könyvesbolt nevű könyvesbolt könyvnyilvántartásával.

Írjunk egy egyszerű VBA kód a munkalap PDF-dokumentummá alakításához, nevet vagy elérési utat nem megadva.

⧭ VBA kód:

 Sub Print_To_PDF() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF End Sub 

⧭ Kimenet:

Futtassa ezt a kódot, és a munkafüzettel azonos nevű PDF-fájlt talál (alapértelmezett név, ha nincs név megadva) a munkafüzettel azonos mappában (alapértelmezett mappa, ha nincs megadva elérési útvonal).

Itt a neve Book1.pdf mivel a munkafüzetem neve Book1 .

További információ: Excel VBA: A nyomtatási terület dinamikus beállítása (7 mód)

Példa 2: Nyomtatás PDF-be Excel VBA-ban megadott névvel és elérési úttal

Most ugyanazt a munkafüzetet konvertáljuk egy másik PDF-fájlba, megadva a nevet és az elérési utat.

Elmentem a PDF-et a következő névvel "Martin könyvesbolt.pdf" útvonalon C:\Users\Public\ExcelWIKI a számítógépemen. Tehát a VBA kód lesz:

⧭ VBA kód:

 Sub Print_To_PDF() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Users\Public\ExcelWIKI\Martin Bookstore.pdf" End Sub 

⧭ Kimenet:

Ez a kód elmenti a PDF-dokumentumot az alábbi elérési útvonalra C:\Users\Public\ExcelWIKI a számítógépemen a következő névvel Martin könyvesbolt.pdf .

Bővebben: Hogyan nyomtassuk ki a kiválasztott területet az Excelben (2 példa)

Hasonló olvasmányok:

• Hogyan nyomtassunk címeket az Excelben (5 egyszerű módja)
• Nyomtasson munkalapot megjegyzésekkel az Excelben (5 egyszerű módja)
• Hogyan nyomtassuk ki a kiválasztott cellákat az Excelben (2 egyszerű módja)
• A nyomtatási terület központosítása az Excelben (4 mód)
• Nyomtatási előnézet megjelenítése az Excel VBA-val (3 makró)

Példa 3: Nyomtatás PDF-be Excel VBA-ban a fájl megnyitása a közzététel után

Most úgy fogjuk kinyomtatni a dokumentumot PDF-be, hogy a fájl a közzététel után megnyílik. Be kell állítanunk a OpenAfterPublish paramétert a Igaz .

Tehát a VBA kód lesz,

⧭ VBA kód:

 Sub Print_To_PDF() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Users\Public\ExcelWIKI\Martin Bookstore.pdf", _ OpenAfterPublish:=True End Sub 

⧭ Kimenet:

Ez a kód elmenti a PDF-dokumentumot az alábbi elérési útvonalra C:\Users\Public\ExcelWIKI a számítógépemen a következő névvel Martin könyvesbolt.pdf és nyissa meg a fájlt, amint közzétették.

Kapcsolódó tartalom: Nyomtatási előnézet beállítása az Excelben (6 lehetőség)

Példa 4: Több munkalap nyomtatása több PDF-fájlba az Excel VBA-ban

Eddig egyetlen munkalapot nyomtattunk ki. Ezúttal több munkalapot fogunk kinyomtatni több PDF-fájlba.

Itt van egy munkafüzetünk 5 munkalapok, amelyek mindegyike egy adott könyvesbolt könyvrekordját tartalmazza.

Ezúttal az összes munkalapot PDF-fájlokká alakítjuk át.

A VBA kód lesz:

⧭ VBA kód:

 Sub Print_Multiple_Sheets_To_PDF() Sheet_Names = InputBox("Enter the Names of the Worksheets to Print to PDF: ") Sheet_Names = Split(Sheet_Names, ", ") For i = LBound(Sheet_Names) To UBound(Sheet_Names) Worksheets(Sheet_Names(i)).ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Users\Public\ExcelWIKI\" + Sheet_Names(i) + ".pdf" Next i EndSub 

⧭ Kimenet:

Futtassa a kódot. Egy beviteli mező fogja kérni, hogy adja meg a PDF-be konvertálandó munkalapok nevét. Itt a következőket adtam meg Joseph Könyvesbolt, Morgan Könyvesbolt, Angela Könyvesbolt .

Kattintson a címre. OK . és PDF fájlként elmenti őket a következő mappába C:\Users\Public\ExcelWIKI .

Bővebben: Több lap nyomtatása az Excelben (7 különböző módszer)

Példa 5: Felhasználó által definiált függvény fejlesztése PDF-fájlba nyomtatáshoz Excel VBA-ban

Végül megmutatom, hogyan fejleszthet ki egy felhasználó által definiált függvényt bármely munkalap PDF-be nyomtatásához az Excel segítségével. VBA .

Fejlesszünk egy függvényt, melynek neve PrintToPDF amely az aktív munkalapot egy PDF-fájlba nyomtatja.

A VBA kód lesz:

⧭ VBA kód:

 Function PrintToPDF() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Users\Public\ExcelWIKI\Martin Bookstore.pdf" End Function 

⧭ Kimenet:

Írja be ezt a funkciót a munkalap bármely cellájába.

Ezután kattintson a BELÉPÉS Az aktív lapot ( Martin könyvesbolt itt) a megadott mappában lévő PDF-fájlba.

Bővebben: Excel VBA: UserForm nyomtatása az oldalra való illesztéshez (2 módszer)

Emlékezetes dolgok

A kódok fejlesztése során a legtöbbször a ActiveSheet tárgya VBA Visszaadja az aktív munkafüzetben az adott pillanatban aktív munkalapot.

Szintén néha használtuk a tulajdonságot ActiveSheet.Name Az aktív munkalap nevét adja vissza.

Következtetés

Tehát így nyomtathat bármilyen munkalapot PDF-be a következővel VBA Excelben. Kérdése van? Kérdezzen bátran! És ne felejtse el meglátogatni oldalunkat! ExcelWIKI további posztokért és frissítésekért.