Lissa has a workbook that contains multiple worksheets. She would like to create individual PDFs for these worksheets (one PDF per worksheet) with the name of the PDF based on the worksheet's name. She wonders if there is a way to do this in Excel.
There are ways to do it, depending on how much time you want to spend. If this is a "one off" occurrence, you might consider just printing each individual worksheet manually. Or, you could copy each worksheet to its own workbook and then print each workbook to PDF.
These are quite manually intensive, though. (Which is why I said they may be good for only "one off" occurrences.) If you would like something a bit more automatic, you'll want to turn to using a macro to do the PDF files. Here's an example of a short macro that will do the PDF creation for you:
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
Note that the path stored in the sFolder variable is set to whatever path is associated with the active workbook. (If you haven't saved the active workbook yet, then the macro will not run properly.) This path is the folder in which the PDF files are saved. If you want them saved in a different location, just change the value assigned to the sFolder variable.
ExcelTips is your source for cost-effective Microsoft Excel training. This tip (13570) applies to Microsoft Excel 2007, 2010, 2013, 2016, 2019, and Excel in Office 365.
Create Custom Apps with VBA! Discover how to extend the capabilities of Office 2013 (Word, Excel, PowerPoint, Outlook, and Access) with VBA programming, using it for writing macros, automating Office applications, and creating custom applications. Check out Mastering VBA for Office 2013 today!
Need your printed output to look its best? You may need to change the settings used by your printer, then. Here's ...
Discover MoreWhen printing information in a workbook, you may want to take advantage of the different print quality settings available ...
Discover MoreNeed to print a portion of a worksheet, but don't want to waste paper by printing the whole thing? It's easy to print ...
Discover MoreFREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
2018-10-23 15:50:33
Lissa
Thank you! That worked for me too!
I did try the macro once, but had that error as well and I haven't had a chance to comment and get a fix for it, until checking in today.
Lissa (original macro request submittal)
2018-10-10 10:29:01
Gary Lundblad
MF, that worked perfectly- thank you!!!
Gary
2018-10-09 23:50:12
MF
Filename:=sFolder & wks.Name & ".pdf", _
Hi Gary,
Try to change the last "full stop" to "comma" as above.
Regards,
MF
2018-10-09 16:28:36
Gary Lundblad
Thank you for the macro, but I receive a "Compile Error" on this portion of the code, which appeared red immediately after pasting it in. Any thoughts?
"wks.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=sFolder & wks.Name & ".pdf". _
OpenAfterPublish:=False"
Thank you!
Gary
2018-10-09 11:03:29
Gary Lundblad
Thank you for the macro, but I receive a "Compile Error" on this portion of the code, which appeared red immediately after pasting it in. Any thoughts?
"wks.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=sFolder & wks.Name & ".pdf". _
OpenAfterPublish:=False"
Thank you!
Gary
Got a version of Excel that uses the ribbon interface (Excel 2007 or later)? This site is for you! If you use an earlier version of Excel, visit our ExcelTips site focusing on the menu interface.
FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2021 Sharon Parq Associates, Inc.
Comments