Save sheet as PDF (Macro)

The following Macro will allow you to save a specified sheet as a PDF Document


Sub Export_PDF()
'Select sheets to export
ThisWorkbook.Sheets("Sheet1").Select
'Create the filename to use
‘Change the text “C:\temp\Saved” to the new location you wish to save the spreadsheet
‘Note that “Saved” is the name of the PDF
filename = " C:\temp\Saved”
'Save the selected sheets as a PDF using the above filename
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, filename:= _
   filename, Quality:=xlQualityStandard, IncludeDocProperties:=True, _
    IgnorePrintAreas:=False, OpenAfterPublish:=False
End Sub

Comments

Post a Comment

Popular posts from this blog

Add Values If Column Equals a certain Value (Formula)

Image
Using the SUMIF Formula we can add up all the results in a range when another range matches the a set criteria In the example below we find any cell which = “Yes” in the range D2:D6 then add the results from B2:B6 =SUMIF(D2:D6,"Yes",B2:B6) Explained =SUMIF( D2:D6 ,"Yes", B2:B6 ) This is the function we are calling to use This is the range we want to match our criteria too This is the criteria we want to match This is the range we want to add together if the above matches Also please see my instruction video for a more detailed step by step guide:
Read more