The below code will let you save each Worksheet as a single PDF
Sub SaveWorkshetAsPDF() Dimws As Worksheet For Each ws In Worksheetsws.ExportAsFixedFormat xlTypePDF, "ENTER FOLDER NAME HERE" ; ws.Name ; ".pdf" Nextws End Sub
Explore comprehensive Excel VBA Course here and, learn to automate your routine Excel reports, processes and tasks.
Happy Excelling
Team Excelgoodies