I have a macro that print certain sheet to PDF once a button is pressed, It works perfectly well. However, the PDF save in D drive under the name "file" I would like this to save in the same folder/file as the excel workbook and the name to be the same as the excel workbook. Could someone please look at the script and suggest/make these changes. Much appreciated.
Please Login or Register to view this content.
Last edited by Kevin Rush; 09-12-2021 at 10:53 AM.
Hi there,
At the beginning add, after the third line stating with 'DIM': (declare variable, then assign the current file path (current workbook) as the file path.
Dim myPath As Variant
myPath = ThisWorkbook.Path
Change:
sNewFilePath = "D:\file.pdf" to: sNewFilePath = myPath & "\file.pdf"
That should do the trick.
If your Question is answered; please mark it SOLVED. If you are happy with a member's solution, say 'Thanks' and click the 'Star' to Add Reputation.
Brilliant, that worked perfectly. Thank you!! The PDF save under the name file, is the away to save it as the same name as the workbook?
Not tested due to lack of sample file.
Please Login or Register to view this content.
Last edited by Vraag en antwoord; 09-12-2021 at 10:29 AM.
Messages have been translated from Dutch to English by means of google translate.
Thank you, I used the end of the script and it worked.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks