Lissa tiene un libro de trabajo que contiene varias hojas de trabajo. Le gustaría crear archivos PDF individuales para estas hojas de trabajo (un PDF por hoja de trabajo)

con el nombre del PDF basado en el nombre de la hoja de trabajo. Se pregunta si hay alguna forma de hacer esto en Excel.

Hay formas de hacerlo, dependiendo de cuánto tiempo quieras dedicar.

Si se trata de una ocurrencia «única», podría considerar imprimir cada hoja de trabajo individual manualmente. O bien, puede copiar cada hoja de trabajo en su propio libro de trabajo y luego imprimir cada libro de trabajo en PDF.

Sin embargo, estos son bastante intensivos manualmente. (Es por eso que dije que pueden ser buenos sólo para casos «únicos».) Si desea algo un poco más automático, querrá utilizar una macro para hacer los archivos PDF. Aquí hay un ejemplo de una pequeña macro que creará el PDF por usted:

Sub CreatePDFs()

Dim wks As Worksheet     Dim sFolder As String     Dim sTemp As String

sFolder = ActiveWorkbook.Path & "\"



sTemp = "Created PDFs for the following worksheets"

For Each wks In ActiveWorkbook.Worksheets         If wks.Visible = xlSheetVisible Then             sTemp = sTemp & vbCrLf & "   * " & wks.Name             wks.ExportAsFixedFormat Type:=xlTypePDF, _               Filename:=sFolder & wks.Name & ".pdf", _               OpenAfterPublish:=False         End If     Next

MsgBox sTemp End Sub

Tenga en cuenta que la ruta almacenada en la variable sFolder se establece en cualquier ruta asociada con el libro activo. (Si aún no ha guardado el libro activo, la macro no se ejecutará correctamente). Esta ruta es la carpeta en la que se guardan los archivos PDF. Si desea que se guarden en una ubicación diferente, simplemente cambie el valor asignado a la variable sFolder.

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (13570) se aplica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 y Excel en Office 365.