Tip: andere talen zijn Google-Vertaald. Je kunt het English versie van deze link.
Log in
x
or
x
x
Registreren
x

or

Hoe batch meerdere Word-documenten naar pdf-bestanden converteren?

U kunt gemakkelijk een Word-document converteren naar een PDF-bestand met de functie Opslaan als in Word. Maar als u alle Word-documenten in een map wilt converteren naar PDF-bestanden in één keer, hoe kunt u dit dan bereiken? Dit artikel toont u een VBA-code om meerdere Word-documenten batchgewijs te converteren naar pdf-bestanden in Word.

Batch converteer meerdere Word-documenten naar pdf-bestanden met VBA

Batch converteer meerdere Word-documenten naar pdf-bestanden met Kutools voor Word


Converteer eenvoudig meerdere Word-documenten naar pdf-bestanden in Word:

De Document Format Converter nut van Kutools for Excel kan u helpen bij het snel converteren van alle .docx-formaatdocumenten in een bepaalde map naar pdf-bestanden. Zie screenshot:

Kutools for Word: met meer dan 100 handige invoegtoepassingen voor Word, gratis om zonder beperkingen in 30-dagen te proberen. Download en gratis proef nu!


Batch converteer meerdere Word-documenten naar pdf-bestanden met VBA

De volgende VBA-code helpt u snel alle Word-documenten in een map naar pdf-bestanden tegelijk te converteren. Doe het als volgt.

1. Druk in Word op anders + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.

2. In de Microsoft Visual Basic voor toepassingen venster klikt bijvoegsel > module, kopieer vervolgens onder VBA-code naar het modulevenster.

VBA-code: Batch converteer meerdere Word-documenten naar pdf-bestanden in Word

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. druk de F5 sleutel om de code uit te voeren.

4. Er verschijnt een Blader-dialoogvenster, selecteer de map die Word-documenten bevat die u naar pdf-bestanden wilt converteren en klik op de OK knop.

Alle Word-documenten in de geselecteerde map worden vervolgens in één keer omgezet naar afzonderlijke pdf-bestanden. Zie screenshot:


Batch converteer meerdere Word-documenten naar pdf-bestanden met Kutools voor Word

Als VBA-code moeilijk te hanteren is, kunt u de Converteer documenten nut van Kutools for Word om het probleem op te lossen.

Kutools for Word : Met meer dan 100 handige invoegtoepassingen voor Word, gratis om te proberen zonder beperking in 30-dagen.

1. klikken Kutools Plus > Doc / Docx. Zie screenshot:

2. In de Document Format Converter venster, moet u het als volgt doen:

2.1) Selecteer de map bevat documenten die u in de map zult converteren naar pdf Bron bestandsmap sectie;

2.2 Selecteer Zet docx in pdf om van de Format Convert keuzelijst;

2.3) Standaard is de Bestemmingspad hetzelfde als bron vak is aangevinkt. Als u alle geconverteerde pdf-bestanden in dezelfde map wilt plaatsen, hoeft u deze optie alleen te selecteren;

Als u de pdf-bestanden en de brondocumenten wilt scheiden, moet u het vinkje verwijderen Bestemmingspad hetzelfde als bron en selecteer een nieuwe map om de pdf-bestanden op te slaan in de Opslaan in doos;

2.4) Klik op de Startpunt knop. Zie screenshot:

3. Dan verschijnt er een dialoogvenster om u te vertellen hoeveel documenten succesvol zijn geconverteerd, klik op de OK knop en sluit de Document Format Converter venster.

Nu worden alle .docx-formaatdocumenten geconverteerd naar pdf-bestanden.

Als u een gratis proefversie van dit hulpprogramma wilt hebben, gaat u naar gratis download van de software eerst en vervolgens de bewerking volgens de bovenstaande stappen toepassen.



Aanbevolen Word-productiviteitstools

Kutools voor Word - meer dan 100 geavanceerde functies voor Word, bespaar uw 50% tijd

  • Gecompliceerde en herhaalde bewerkingen kunnen eenmalig worden uitgevoerd in seconden.
  • Voeg meerdere afbeeldingen in meerdere mappen tegelijk in Word-documenten in.
  • Voeg meerdere Word-bestanden samen en combineer ze tot één map met de door u gewenste volgorde.
  • Splits het huidige document in afzonderlijke documenten volgens kop, sectie-einde of andere criteria.
  • Converteer bestanden tussen Doc en Docx, Docx en PDF, verzameling tools voor algemene conversies en selectie, enzovoort ...
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.
    Stefan · 14 days ago
    Hi there,


    is there an easy way to adjust the VBA Code so that the Documents are convertet to .txt-Files?
  • To post as a guest, your comment is unpublished.
    Sammy · 1 months ago
    Is there any way to have the file name taken from the text of the document?
  • To post as a guest, your comment is unpublished.
    Marzio · 2 months ago
    VBA if i try to convert file that contains macros the macro swith to open file and ends without close file.
  • To post as a guest, your comment is unpublished.
    michaelwaung · 3 months 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