¿Cómo convertir por lotes varios documentos de Word a archivos pdf?
Es fácil para usted convertir un documento de Word en un archivo PDF con la función Guardar como en Word. Pero si desea convertir todos los documentos de Word en una carpeta en archivos PDF separados a la vez, ¿cómo puede lograrlo? Este artículo le mostrará un código VBA para convertir por lotes varios documentos de Word a archivos PDF en Word.
Convierta por lotes varios documentos de Word a archivos pdf con VBA
Convierta por lotes varios documentos de Word a archivos pdf con Kutools para Word
Convierta por lotes varios documentos de Word a archivos pdf con VBA
El siguiente código VBA lo ayuda a convertir rápidamente todos los documentos de Word en una carpeta a archivos PDF a la vez. Haz lo siguiente.
1. En Word, presione el otro + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.
2. En el Microsoft Visual Basic para aplicaciones ventana, haga clic recuadro > Módulo, luego copie el código de VBA a continuación en la ventana del Módulo.
Código VBA: convierta por lotes varios documentos de Word a archivos pdf en 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. presione el F5 clave para ejecutar el código.
4. Aparecerá un cuadro de diálogo Examinar, seleccione la carpeta que contiene los documentos de Word que convertirá a archivos pdf y haga clic en OK del botón.
Luego, todos los documentos de Word en la carpeta seleccionada se convierten en archivos PDF separados a la vez. Ver captura de pantalla:
Convierta por lotes varios documentos de Word a archivos pdf con Kutools para Word
Si el código VBA es difícil de manejar, puede probar el Convertir documentos utilidad de Kutools for Word para resolver el problema.
Kutools for Word : Con más de 100 útiles complementos de Word, libre de probar sin limitación en 60 días.
1. Hacer clic en Kutools Más > Doc / Docx. Ver captura de pantalla:
2. En el Convertidor de formato de documento ventana, debe hacer lo siguiente:
3. Luego aparece un cuadro de diálogo para indicarle cuántos documentos se han convertido correctamente, haga clic en el OK botón y cierre el Convertidor de formato de documento ventana.
Ahora todos los documentos en formato .docx se convierten a archivos pdf.
Si desea tener una prueba gratuita de esta utilidad, vaya a descarga gratis el software primero, y luego vaya a aplicar la operación según los pasos anteriores.
Las mejores herramientas de productividad de oficina
Kutools for Word - Mejore su experiencia con Word con Over 100 ¡Características notables!
🤖 Asistente de IA de Kutools: Transforma tu escritura con IA - Generar contenido / Reescribir texto / Resumir documentos / Solicite información basado en el documento, todo dentro de Word
📘 Dominio del documento: Dividir páginas / Combinar documentos / Exportar selección en varios formatos (PDF/TXT/DOC/HTML...) / Convertir por lotes a PDF / Exportar páginas como imágenes / Imprima varios archivos a la vez...
✏ Edición de contenidos: Buscar y reemplazar por lotes en varios archivos / Cambiar el tamaño de todas las imágenes / Transponer filas y columnas de tabla / Convertir tabla en texto...
🧹 Limpieza sin esfuerzo: barrer Espacios extra / Saltos de sección / Todos los encabezados / Cuadros de texto / Los hipervínculos / Para obtener más herramientas de extracción, diríjase a nuestro Quitar grupo...
➕ Inserciones creativas: Insertar Mil Separadores / Casillas de verificación / Botones de radio / Código QR / Barcode / Tabla de líneas diagonales / Título de la ecuación / Captura de imagen / Pie de tabla / Varias imágenes / Descubre más en el Insertar grupo...
🔍 Selecciones de precisión: Localizar páginas específicas / tablas / formas / párrafos de encabezado / Mejorar la navegación con más, Seleccionar características...
⭐ Mejoras de estrellas: Navegue rápidamente a cualquier ubicación / insertar automáticamente texto repetitivo / alternar sin problemas entre ventanas de documentos / 11 herramientas de conversión...