Save as PDF Macro

Does anybody have a macro to save a drawing as a PDF with thesamefile name and locationSolidworksDrawings And Detailing