Como converter em lote vários documentos do Word para arquivos PDF

É fácil converter um único documento do Word para PDF usando o recurso Salvar Como no Word. Mas e se você precisar converter todos os documentos do Word em uma pasta em arquivos PDF separados de uma só vez? Este guia mostrará como converter em lote vários documentos do Word para arquivos PDF no Word.

Converter em lote vários documentos do Word para arquivos PDF com VBA
Converter em lote vários documentos do Word para arquivos PDF com Kutools para Word

Converter em lote vários documentos do Word para arquivos PDF com VBA

O seguinte código VBA permite que você converta rapidamente todos os documentos do Word em uma pasta para arquivos PDF de uma só vez. Siga estas etapas:

1. No Word, pressione Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.
2. No editor, clique em "Inserir" > "Módulo", depois copie e cole o seguinte código VBA na janela do módulo.

   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. Pressione F5 para executar o código.
4. Uma caixa de diálogo Procurar aparecerá. Selecione a pasta contendo os documentos do Word que deseja converter para PDFs e clique em "OK".

   

Todos os documentos do Word na pasta selecionada serão convertidos em arquivos PDF separados.

Converter em lote vários documentos do Word para arquivos PDF com Kutools para Word

Se o código VBA for difícil de lidar, você pode experimentar o utilitário "Converter documentos" do Kutools para Word. Esta ferramenta simplifica o processo, tornando-o mais acessível e eficiente em comparação com métodos manuais no Word.

1. Clique em "Kutools Plus" > "Doc/Docx".

   

2. Na janela "Conversor de Formato de Documento", siga estas etapas:
   1. Selecione "Converter Docx para Pdf" no menu suspenso "Converter Formato".
   2. Clique para adicionar documentos:

      Escolha "Arquivos" para adicionar documentos individuais. Escolha "Pasta" para adicionar todos os documentos de uma pasta específica.

   3. Por padrão, os arquivos PDF serão salvos no mesmo local dos arquivos de origem. Para alterar o local, clique no botão "Procurar" e escolha um novo destino.
   4. Opcionalmente, marque a caixa "Excluir arquivos de origem após a conversão" para remover os arquivos originais após a criação dos PDFs.
   5. Opcionalmente, marque a caixa "Manter a data de modificação dos arquivos originais" para reter os metadados dos arquivos originais.
   6. Depois que todas as configurações estiverem concluídas, clique em "OK".

   

Agora, todos os documentos no formato .docx foram convertidos com sucesso para arquivos PDF.

Melhores Ferramentas de Produtividade para Office

Kutools para Word – Eleve sua experiência no Word com mais de 100 recursos incríveis!

🤖 Recursos de IA do Kutools: Assistente de IA / Assistente em Tempo Real / Super Polir (Preserva Formato) / Super Traduzir (Preserva Formato) / Redação por IA / Revisão por IA...

📘 Domínio de Documentos: Dividir Páginas / Mesclar Documentos / Exportar Seleção em Diversos Formatos (PDF/TXT/DOC/HTML...) / Converter em Lote para PDF...

✏ Edição de Conteúdo: Localizar e Substituir em Lote em Vários Arquivos / Redimensionar Todas as Imagens / Transpor Linhas e Colunas da Tabela / Converter Tabela para Texto...

🧹 Limpeza Sem Esforço: Elimine Espaços Extras / Quebras de Seção / Caixas de Texto / Hiperlinks / Para mais ferramentas de remoção, acesse o grupo Remover...

➕ Inserções Criativas: Inserir Separadores de Milhar / Caixas de Seleção / Botões de Rádio / QR Code / Código de Barras / Múltiplas Imagens / Descubra mais no grupo Inserir...

🔍 Seleções Precisas: Identifique Páginas Específicas / Tabelas / Formas / Parágrafos de Título / Melhore a navegação com mais recursos de Selecionar...

⭐ Melhorias Estrela: Navegue para Qualquer Localização / Insira Texto Repetitivo Automaticamente / Alterne Entre Janelas de Documentos /11 Ferramentas de Conversão...

👉 Quer experimentar esses recursos? Baixe o Kutools para Word agora! 🚀

Download Gratuito     Comprar Agora     Saiba Mais sobre o Kutools para Word

 

Melhores Ferramentas de Produtividade para Office

Kutools para Word – 100+ Ferramentas para Word

• 🤖 Recursos de IA do Kutools: Assistente de IA / Assistente em Tempo Real / Super Polir / Super Traduzir / Redação por IA / Revisão por IA
• 📘 Domínio de Documentos: Dividir Páginas / Mesclar Documentos / Converter em Lote para PDF
• ✏ Edição de Conteúdo: Localizar e Substituir em Lote / Redimensionar Todas as Imagens
• 🧹 Limpeza Sem Esforço: Remover Espaços Extras / Remover Quebras de Seção
• ➕ Inserções Criativas: Inserir Separadores de Milhar / Inserir Caixas de Seleção / Criar QR Codes

Download Gratuito Comprar Agora Saiba Mais sobre o Kutools