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, and 2016.
Program Successfully in Excel! John Walkenbach's name is synonymous with excellence in deciphering complex technical topics. With this comprehensive guide, "Mr. Spreadsheet" shows how to maximize your Excel experience using professional spreadsheet application development tips from his own personal bookshelf. Check out Excel 2013 Power Programming with VBA today!
Need a full-page border on your Excel printouts? It's not as easy to get one as you might wish. There are a few ways you ...
Discover MoreNeed to only print out certain rows from your data? It's easy to do if you apply the filtering or sorting techniques ...
Discover MoreIt used to be quite difficult to produce a PDF file from an Excel workbook. Times change, though, and you now have a ...
Discover MoreFREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
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 © 2018 Sharon Parq Associates, Inc.
Comments