VBA Code to Save Selected Range as a PDF in Excel

VBA code that you can use to save a selected range as a PDF in Excel.

VBA Code:

Sub SaveSelectedRangeAsPDF()
    Dim rng As Range
    Dim filePath As String
    ' Set the range to be saved as PDF (change as per your requirement)
    Set rng = Selection
    ' Set the folder path to save the PDF file
    filePath = "C:\Path\To\Save\PDF\" ' Change the path to your desired folder
    ' Create the folder if it doesn't exist
    If Dir(filePath, vbDirectory) = "" Then
        MkDir filePath
    End If
    ' Export the selected range as PDF
    rng.ExportAsFixedFormat Type:=xlTypePDF, Filename:=filePath & "SelectedRange.pdf", Quality:=xlQualityStandard
    ' Inform the user that the PDF file has been saved
    MsgBox "The selected range has been saved as a PDF file!"
End Sub

Check All VBA Codes

Join Our Telegram Group techguruplus telegram group Join Our WhatsApp Group techguruplus whatsapp group

Leave a Comment