add "SaveAs" to pdf export and email code

[matt5596]

I have the following code working well. I'd like the pdf to be saved to the users local machine before it emails it. The user must be able to choose the path. How can I do this?

Please Login or Register  to view this content.

[G e r a r d]

Put this function in the module

Please Login or Register  to view this content.

change the part where de pdf is created to:
It requests to select a folder. If canceled the mydocuments folder is chosen as save folder

Please Login or Register  to view this content.

[matt5596]

It prompts the user to select target folder but never sets a filename or saves it to the folder.

also, how can i get the SaveAs name to show up automatically?

I use the following code to save Excel but I can't get it to work saving pdf.

Please Login or Register  to view this content.

[G e r a r d]

Here a macro what will save the sheet as pdf, after Save as dialog is filled out.

Please Login or Register  to view this content.