VBA Export as PDF and Save to Location with name as per a Cell in the worksheet

Question

It will save under the name I give it, which is acceptable, and I recorded a macro to export as a PDF.

The subsequent save, however, overwrite the initial save.

I configured Cell "S2" to show the file location, file name, and the current date and time.

How can I export using cell S2 as the location and filename in VBA?

Answer 1

Following is the code that gets generated when you record a macro to export excel to pdf.

Recorded Code :

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
    "C:\users\Desktop\macros\filename.pdf", Quality _
    :=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
    OpenAfterPublish:=True

Update Code to get the filename from cell S2:

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
    **Range("S2").Value** & ".pdf", Quality _
    :=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
    OpenAfterPublish:=True