I am setting up a file for a couple of clients to use and I need the file path to save the files in to be specified by each individual client.
I have set up a named range for this of 'Filepath'
I have already managed to specify the filename in a similar way (range name 'Filename') and this works OK but it saves to the directory that the excel spreadsheet is saved to.
The macro I use for this is:
I have attached a copy of the file.Sub pdfsave()
pdfname = Range("Filename").Value
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfname, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
End Sub
Bookmarks