Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako pretvoriti več dokumentov Word v datoteke PDF?

Preprosto je, da pretvorite dokument Word v datoteko PDF s funkcijo Shrani kot v Wordu. Ampak, če želite pretvoriti vse Wordove dokumente v mapo, da ločite datoteke PDF hkrati, kako lahko to dosežete? Ta članek vam bo pokazal kodo VBA za pretvorbo več dokumentov Word v datoteke PDF v Wordu.

Batch pretvoriti več Word dokumentov v pdf datoteke z VBA

Pretvorba več dokumentov Word v datoteke PDF s programom Kutools for Word


Preprosto serijo pretvorite več dokumentov Word v datoteke PDF v programu Word:

O Pretvornik oblike dokumenta uporabnost Kutools za Excel vam lahko pomaga hitro pretvoriti vse dokumente .docx v določeni mapi v pdf datoteke. Prikaz slike:

Kutools for Word: z več kot 100 priročnimi dodatki za Word, lahko brezplačno poskusite brez omejitev v 30 dneh. Prenesite in brezplačno preizkusite zdaj!


Batch pretvoriti več Word dokumentov v pdf datoteke z VBA

Naslednja VBA koda vam pomaga hitro pretvoriti vse Wordove dokumente v mapo v pdf datoteke hkrati. Prosimo, naredite na naslednji način.

1. V Wordu pritisnite tipko druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduli, nato pa kopirajte pod kodo VBA v okno Modul.

VBA koda: Batch pretvori več dokumentov Word v datoteke PDF v Wordu

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. Pritisnite F5 ključ za zagon kode.

4. Pojavi se pogovorno okno brskanja, izberite mapo, ki vsebuje Wordove dokumente, ki jih boste pretvorili v datoteke PDF, in kliknite na OK gumb.

Potem se vsi dokumenti Worda v izbrani mapi pretvorijo v ločene pdf datoteke hkrati. Prikaz slike:


Pretvorba več dokumentov Word v datoteke PDF s programom Kutools for Word

Če je kodo VBA težko obdelati, lahko poskusite Pretvarjanje dokumentov uporabnost Kutools for Word rešiti problem.

Kutools for Word : Z več kot 100 priročnimi dodatki Word, brezplačno lahko poskusite brez omejitev v 30 dneh.

1. klik Kutools Plus > Doc / Docx. Prikaz slike:

2. V Ljubljani Pretvornik oblike dokumenta okno, morate storiti, kot sledi:

2.1) Izberite mapo vsebuje dokumente, ki jih boste pretvorili v pdf v Izvorna mapa mape oddelek;

2.2 Izberite Pretvori docx v pdf Iz Format Pretvori spustni seznam;

2.3) Privzeto je Ciljna pot je enaka kot vir polje je označeno. Če želite vstaviti vse pretvorjene pdf datoteke v isto mapo, samo to možnost izberite;

Če želite ločiti datoteke PDF in izvorne dokumente, morate počistiti potrditveno polje Ciljna pot je enaka kot vir polje in izberite novo mapo, da shranite datoteke PDF v Shrani v škatla;

2.4) Kliknite na Začetek gumb. Prikaz slike:

3. Nato se prikaže pogovorno okno, ki vam pove, koliko dokumentov je bilo uspešno pretvorjenih, kliknite na OK gumb in zaprite Pretvornik oblike dokumenta okno.

Vsi dokumenti .docx formatov so pretvorjeni v datoteke PDF.

Če želite imeti brezplačen preskus tega pripomočka, pojdite na brezplačno prenesete programsko opremo najprej in pojdite, da uporabite operacijo v skladu z zgornjimi koraki.

Priporočena orodja za produktivnost Worda

shot kutools beseda kutools zavihek 1180x121
shot kutools beseda kutools plus zavihek 1180x120

Kutools for Word - več kot 100 napredne funkcije Za Microsoft Word shranite svoj čas 50%

  • Zapletene in ponavljajoče se operacije lahko opravite enkratno obdelavo v sekundah.
  • V dokument Worda vstavite več slik v mapah.
  • Združite in združite več datotek Word v mapah v eno z želenim naročilom.
  • Razdelite trenutni dokument v ločene dokumente v skladu z naslovom 1, odlomkom odseka ali drugimi merili.
  • Pretvorite datoteke med Doc in Docx, Docx in PDF, zbirko orodij za običajne konverzije in izbiro, in tako naprej...
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    michaelwaung · 7 days ago
    So nice blog, Thanks for sharing this blog. It Has so useful information for users. I liked this information so much.
    Hope you keep sharing such kind of information convert word doc to html