¿Cómo convertir varios libros u hojas de trabajo en archivos PDF a la vez en Excel?
En algún momento, debe convertir sus archivos de Excel en archivos PDF, para que otros no puedan modificarlos. En Excel, podemos guardar un archivo de Excel como archivo PDF utilizando la función Guardar como. Pero, ¿cómo se convierten varios libros de trabajo en archivos PDF al mismo tiempo en Excel?
- Convierta varios libros de trabajo en archivos PDF con la función Guardar como uno por uno
- Convierta varios libros de trabajo en archivos PDF con código VBA a la vez
- Convierta varios libros de trabajo en archivos PDF con una característica poderosa
- Convierta varias hojas de trabajo de un libro de trabajo para separar archivos PDF con código VBA
- Convierta varias hojas de trabajo de un libro de trabajo en archivos PDF separados con una función práctica
Convierta varios libros de trabajo en archivos PDF con la función Guardar como uno por uno
Normalmente, la función Guardar como en Excel puede ayudarlo a guardar el libro completo en un archivo PDF, haga lo siguiente:
1. Inicie su libro de trabajo que desea convertir a formato PDF.
2. Hacer clic Archive > Guardar como, Y en el Guardar como cuadro de diálogo, especifique una carpeta para guardar el nuevo archivo, luego seleccione (PDF) del desplegable Guardar como tipo lista desplegable y luego haga clic en Opciones botón, ver captura de pantalla:
3. Entonces, en el apareció Opciones cuadro de diálogo, comprobar Libro de trabajo completo, ver captura de pantalla:
4. Y luego haz clic OK > Guardar, todo este libro se ha guardado en formato de archivo PDF.
Convierta varios libros de trabajo en archivos PDF con código VBA a la vez
Si hay cientos de archivos de Excel que deben convertirse, el método anterior será problemático, aquí, hablaré sobre un código VBA para convertir varios libros de trabajo en archivos PDF a la vez, siga los siguientes pasos:
1. Mantenga pulsado el ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.
2. Hacer clic recuadro > Móduloy pegue el siguiente código en el Módulo Ventana.
Código VBA: convierta varios libros de trabajo en archivos PDF a la vez
Sub ExcelSaveAsPDF()
'Updateby Extendoffice
Dim strPath As String
Dim xStrFile1, xStrFile2 As String
Dim xWbk As Workbook
Dim xSFD, xRFD As FileDialog
Dim xSPath As String
Dim xRPath, xWBName As String
Dim xBol As Boolean
Set xSFD = Application.FileDialog(msoFileDialogFolderPicker)
With xSFD
.Title = "Please select the folder contains the Excel files you want to convert:"
.InitialFileName = "C:\"
End With
If xSFD.Show <> -1 Then Exit Sub
xSPath = xSFD.SelectedItems.Item(1)
Set xRFD = Application.FileDialog(msoFileDialogFolderPicker)
With xRFD
.Title = "Please select a destination folder to save the converted files:"
.InitialFileName = "C:\"
End With
If xRFD.Show <> -1 Then Exit Sub
xRPath = xRFD.SelectedItems.Item(1) & "\"
strPath = xSPath & "\"
xStrFile1 = Dir(strPath & "*.*")
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Do While xStrFile1 <> ""
xBol = False
If Right(xStrFile1, 3) = "xls" Then
Set xWbk = Workbooks.Open(Filename:=strPath & xStrFile1)
xbwname = Replace(xStrFile1, ".xls", "_pdf")
xBol = True
ElseIf Right(xStrFile1, 4) = "xlsx" Then
Set xWbk = Workbooks.Open(Filename:=strPath & xStrFile1)
xbwname = Replace(xStrFile1, ".xlsx", "_pdf")
xBol = True
ElseIf Right(xStrFile1, 4) = "xlsm" Then
Set xWbk = Workbooks.Open(Filename:=strPath & xStrFile1)
xbwname = Replace(xStrFile1, ".xlsm", "_pdf")
xBol = True
End If
If xBol Then
xWbk.ExportAsFixedFormat Type:=xlTypePDF, Filename:=xRPath & xbwname & ".pdf"
xWbk.Close SaveChanges:=False
End If
xStrFile1 = Dir
Loop
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
3. Entonces presione F5 para ejecutar este código, y se mostrará una ventana, seleccione una carpeta que contenga los libros de trabajo que desea convertir, vea la captura de pantalla:
4. Luego, haga clic en OK, se abre otra ventana, seleccione la ruta de la carpeta donde desea generar los nuevos archivos PDF, vea la captura de pantalla:
5. Y luego, clik OK, después de finalizar la conversión, puede ir a la carpeta especificada para obtener una vista previa del resultado convertido, ver capturas de pantalla:
Convierta varios libros de trabajo en archivos PDF con una característica poderosa
Si tiene Kutools for Excel, Con su Convertidor de formato utilidad, puede convertir rápidamente varios libros de trabajo en archivos PDF a la vez.
Después de instalar Kutools for Excel, haz lo siguiente:
1. Hacer clic Kutools Más > Libro de trabajo > Convertidor de formato, ver captura de pantalla:
2. Y aparece un cuadro emergente para recordarle que debe cerrar los libros de trabajo que desea convertir.
3. Hacer clic OK, luego, en el Convertidor de formato de archivo diálogo, especifique las siguientes opciones:
- Bajo la Tipo de conversión lista desplegable, seleccione Libro de Excel a PDF;
- A continuación, haga clic en Añada botón para agregar los archivos de Excel que desea convertir, puede agregar los libros de trabajo desde su disco computor o OneDrive según lo necesite;
4. Después de insertar los libros de trabajo que desea convertir, aún en el Convertidor de formato de archivo cuadro de diálogo, haga clic en para elegir una ruta de carpeta para generar los archivos convertidos, y luego especificar algunas operaciones que necesita en la parte inferior del cuadro de diálogo, vea la captura de pantalla:
- Si los libros de trabajo de las subcarpetas también debían convertirse, consulte la Incluir subcarpetas al agregar carpetas casilla de verificación;
- Si desea eliminar los archivos originales después de la conversión, marque la casilla Eliminar archivos de origen después de la conversión caja;
- Si desea mantener la fecha de modificación de los archivos originales, marque la Conservar la fecha de modificación de los archivos originales caja;
- La estructura del directorio del archivo se puede conservar marcando el La estructura de directorios del archivo se conserva cuando se convierte caja;
5. Luego haga clic OK para comenzar a convertir, cuando todos los archivos de Excel especificados se hayan convertido a archivos PDF, puede ir a la carpeta especificada para obtener una vista previa del resultado convertido, vea las capturas de pantalla:
Convierta varias hojas de trabajo de un libro de trabajo para separar archivos PDF con código VBA
En algunos casos, es posible que desee convertir cada hoja de trabajo en el libro de trabajo en archivos PDF separados, si hay muchas hojas en su libro de trabajo, el siguiente código VBA puede ayudarlo a guardar cada hoja de trabajo como un archivo PDF a la vez.
1. Abra un libro de trabajo que desee convertir y luego mantenga presionada la tecla ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.
2. Hacer clic recuadro > Móduloy pegue el siguiente código en el Módulo Ventana.
Código VBA: convierta varias hojas de trabajo de un libro de trabajo en archivos PDF separados
Sub SplitEachWorksheet()
'Updateby Extendoffice
Dim xSPath As String
Dim xSFD As FileDialog
Dim xWSs As Sheets
Dim xWb As Workbook
Dim xWbs As Workbooks
Dim xNWb As Workbook
Dim xInt, xI As Integer
Set xSFD = Application.FileDialog(msoFileDialogFolderPicker)
With xSFD
.title = "Please select a folder to save the converted files:"
.InitialFileName = "C:\"
End With
If xSFD.Show <> -1 Then Exit Sub
xSPath = xSFD.SelectedItems.Item(1)
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xWb = Application.ActiveWorkbook
Set xWbs = Application.Workbooks
Set xWSs = xWb.Sheets
Set xNWb = xWbs.Add
xInt = xWSs.Count
For xI = 1 To xInt
On Error GoTo EBreak
Set xWs = xWSs.Item(xI)
If xWs.Visible Then
xWSs(xWs.Name).Copy
Application.ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=xSPath & "\" & xWs.Name & ".pdf"
Application.ActiveWorkbook.Close False
End If
EBreak:
Next
xWb.Activate
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
3. Entonces presione F5 para ejecutar este código, y se abre una ventana, elija una ruta de carpeta para ubicar los archivos PDF convertidos, vea la captura de pantalla:
4. Luego, haz clic OK botón, todas las hojas de trabajo dentro del libro de trabajo actual se han convertido archivos PDF por separado, vea la captura de pantalla:
Convierta varias hojas de trabajo de un libro de trabajo en archivos PDF separados con una función práctica
Kutools for Excel también admite una función útil: Libro de trabajo dividido, con esta función, puede guardar varias hojas de trabajo dentro del libro para separar archivos de Excel, archivos Txt, archivos CSV y archivos PDF según lo necesite.
Después de instalar Kutools for Excel, haz lo siguiente:
1. Abra el libro de trabajo en el que desea guardar cada hoja como archivo PDF y luego haga clic en Kutool más > Libro de trabajo > Libro de trabajo dividido, ver captura de pantalla:
2. En la Libro de trabajo dividido cuadro de diálogo, marque la hoja que desea guardar y luego elija PDF (* .pdf) del desplegable Guardar como tipo lista desplegable y luego haga clic en Mini Split botón, en el Seleccionar carpeta ventana, especifique una carpeta para colocar los archivos convertidos, vea la captura de pantalla:
3. Y luego, todas las hojas de trabajo seleccionadas en el libro de trabajo actual se han guardado en archivos PDF individualmente, vea la captura de pantalla:
Artículos más relativos:
- Convierta varios archivos Xls a archivos Xlsx en Excel
- Para convertir un antiguo archivo xls de Excel en un nuevo archivo xlsx, puede aplicar la función Guardar como en Excel, pero, si hay que convertir varios archivos xls, ¿cómo podría hacer frente a esta tarea de forma rápida y sencilla?
- Guardar todas las hojas de trabajo solo como valores
- Si tiene un libro de trabajo que contiene varias fórmulas, ahora necesita distribuir este archivo a otros usuarios, no desea mostrar las fórmulas, solo se muestran los valores. Normalmente, podemos guardar rápidamente una hoja de trabajo como valores copiando y pegando los datos solo como valores. Pero, ¿cómo podría guardar todas las hojas de trabajo como valores solo sin copiar y pegar una por una?
- Botón de comando para guardar la hoja de trabajo activa como archivo PDF
- Mientras trabaja en Microsoft Excel, puede enfrentar el problema de guardar la hoja de trabajo activa como archivo PDF. En este artículo, puede aprender cómo guardar la hoja de trabajo activa como archivo PDF con código VBA a través de un botón de comando. Y si también desea guardar un rango o cada hoja de trabajo en el libro activo como un archivo PDF individual, este artículo también puede ayudarlo.
- Divida una mesa grande en varias mesas pequeñas
- Si tiene una hoja de trabajo grande que contiene varias columnas y cientos o miles de datos de filas, ahora, desea dividir esta tabla grande en varias tablas pequeñas según el valor de la columna o el número de filas para obtener los siguientes resultados. ¿Cómo podría hacer frente a esta tarea en Excel?
- Dividir un libro para separar archivos de Excel
- Es posible que deba dividir un libro grande para separar los archivos de Excel y guardar cada hoja de trabajo del libro como un archivo de Excel individual. Por ejemplo, puede dividir un libro en varios archivos de Excel individuales y luego entregar cada archivo a una persona diferente para que lo maneje. Al hacerlo, puede lograr que ciertas personas manejen datos específicos y mantengan sus datos seguros. Este artículo presentará formas de dividir un libro grande para separar archivos de Excel según cada hoja de trabajo.
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!