Conas baisc de dhoiciméid Word iolracha a thiontú go comhaid pdf?

Is furasta duit doiciméad Word a thiontú go comhad PDF leis an bhfeidhm Save as function i Word. Ach más mian leat gach doiciméad Word a thiontú i bhfillteán chun comhaid PDF a scaradh ag an am céanna, conas is féidir leat é a bhaint amach? Taispeánfaidh an t-alt seo cód VBA duit chun iliomad doiciméad Word a chomhshó go comhaid pdf i Word.

Baisc doiciméid iolracha Word a thiontú go comhaid pdf le VBA
Baisc doiciméid iolracha Word a thiontú go comhaid pdf le Kutools for Word

Baisc doiciméid iolracha Word a thiontú go comhaid pdf le VBA

The following VBA code allows you to quickly convert all Word documents in a folder to PDF files at once. Follow these steps:

1. In Word, press Alt + F11 a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
2. sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil Ionsáigh > Modúil, ansin cóipeáil agus greamaigh an cód VBA seo a leanas isteach sa Modúil fhuinneog.

   Sub ConvertWordsToPdfs()
   'Updated by Extendoffice 20181123
       Dim xIndex As String
       Dim xDlg As FileDialog
       Dim xFolder As Variant
       Dim xNewName As String
       Dim xFileName As String
       Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
       If xDlg.Show <> -1 Then Exit Sub
       xFolder = xDlg.SelectedItems(1) + "\"
       xFileName = Dir(xFolder & "*.*", vbNormal)
       While xFileName <> ""
           If ((Right(xFileName, 4)) <> ".doc" Or Right(xFileName, 4) <> ".docx") Then
               xIndex = InStr(xFileName, ".") + 1
               xNewName = Replace(xFileName, Mid(xFileName, xIndex), "pdf")
               Documents.Open FileName:=xFolder & xFileName, _
                   ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
                   PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
                   WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
                   wdOpenFormatAuto, XMLTransform:=""
               ActiveDocument.ExportAsFixedFormat OutputFileName:=xFolder & xNewName, _
                   ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:= _
                   wdExportOptimizeForPrint, Range:=wdExportAllDocument, From:=1, To:=1, _
                   Item:=wdExportDocumentContent, IncludeDocProps:=True, KeepIRM:=True, _
                   CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, _
                   BitmapMissingFonts:=True, UseISO19005_1:=False
               ActiveDocument.Close
           End If
           xFileName = Dir()
       Wend
   End Sub

   

3. Preas F5 chun an cód a rith.
4. A Brabhsáil dialog will pop up. Select the folder containing the Word documents you want to convert to PDFs, and click OK.

All Word documents in the selected folder will be converted to separate PDF files. See screenshot:

Baisc doiciméid iolracha Word a thiontú go comhaid pdf le Kutools for Word

Má tá sé deacair cód VBA a láimhseáil, is féidir leat triail a bhaint as an Tiontaigh cáipéisí fóntais de Kutools le haghaidh Word chun an fhadhb a réiteach.

1. cliceáil Kutools Plus > Doc / Docx. Féach an pictiúr:

2. Sa Tiontaire Formáid Doiciméid fuinneog, ní mór duit a dhéanamh mar a leanas:

3. Ansin tagann bosca dialóige suas chun a insint duit cé mhéad doiciméad a tiontaíodh go rathúil, cliceáil an OK cnaipe agus dún an Tiontaire Formáid Doiciméid fhuinneog.

Anois athraítear gach doiciméad formáide .docx go comhaid pdf.

Más mian leat triail saor in aisce a bhaint as an bhfóntas seo, téigh chuig Íosluchtaigh kutools le haghaidh focal ar dtús, agus ansin téigh chun an oibríocht a chur i bhfeidhm de réir na gcéimeanna thuas.

Uirlisí Táirgiúlachta Oifige is Fearr

Kutools le haghaidh Word - Elevate Your Word Experience with Over 100 Gnéithe Suntasacha!

🤖 Gnéithe Kutools AI: Gin Ábhar / Athscríobh Téacs / Doiciméad C&A / Faigh Freagraí Tapa / Aistrigh doiciméid / Doiciméad Polainnis (Caomhnaigh Formáid)...

📘 Máistreacht Doiciméad: Leathanaigh Scoilte / Cumaisc Doiciméid / Roghnú Easpórtála i bhFormáidí Éagsúla (PDF/TXT/DOC/HTML...) / Baisc a thiontú go PDF...

✏ Eagarthóireacht na nÁbhar: Baisc Aimsigh agus Ionadaigh thar Chomhaid Il / Athraigh Méid Gach Pictiúr / Trasnaigh Rónna Tábla agus Colúin / Tiontaigh Tábla go Téacs...

🧹 Effortless Glan: Sguab as Spásanna Breise / Sosanna Alt / Boscaí Téacs / Hipearnasc / Chun níos mó uirlisí a bhaint, ceann chuig an Bain grúpa...

➕ Ionsáigh Cruthaitheach: cuir isteach Míle Deighilteoir / Boscaí Seiceála / Cnaipí Raidió / Cód QR / barcode / Pictiúir Il / Faigh amach níos mó sa Ionsáigh grúpa...

🔍 Roghanna Beachtais: Pionta Leathanaigh Sonracha / Táblaí / cruthanna / Míreanna Ceannteideal / Feabhsaigh an loingseoireacht le níos mó Roghnaigh bailte fearainn...

⭐ Feabhsuithe Réalta: Déan nascleanúint chuig Suíomh ar bith / Uath-Ionsáigh Téacs Athchleachtach / Scoránaigh Idir Windows Doiciméad / 11 Tiontú uirlisí...

???? Ar mhaith leat triail a bhaint as na gnéithe seo? Íoslódáil Kutools le haghaidh Word anois! 🚀

Free Download     Ceannaigh Anois     Tuilleadh eolais faoi Kutools le haghaidh Word

 

Uirlisí Táirgiúlachta Oifige is Fearr

Kutools le haghaidh Word - 100+ Uirlisí le haghaidh Word

• 🤖 Gnéithe Kutools AI: Gin, Athscríobh, Achoimre a dhéanamh ar, aistriú Doiciméid / Faigh Freagraí Tapa / Doiciméad Polainnis (Caomhnaigh Formáid)
• 📘 Máistreacht Doiciméad: Leathanaigh Scoilte / Cumaisc Doiciméid / Baisc a thiontú go PDF
• ✏ Eagarthóireacht na nÁbhar: Faigh Baisc agus Ionadaigh / Athraigh Méid Gach Pictiúr
• 🧹 Effortless Glan: Bain Spásanna Breise / Bain Sosanna Alt
• ➕ Ionsáigh Cruthaitheach: Cuir isteach na mílte deighilteoirí / Cuir Seiceálacha isteach / Cruthaigh Cóid QR

Free Download Ceannaigh Anois Tuilleadh eolais faoi Kutools