Read out Filename and Save all Sheet as Filename.pdf

[bluesurger]

hi,

i need your help for a little Problem.
I want to put in a Button which save the the Excelfile [all sheets] as Filename.pdf

It is no problem to record a macro. But if i export the macro. The filename is not not the filename from the actually sheet.

Please Login or Register  to view this content.

But how have i to change the macro that the current filename is in the row: "C:\Users\????\Desktop\TEST-Marco-Ordner\20140524_Test.pdf"

[ARGK]

Hi
Try this code and add the macro to a buton on your Worksheet

Please Login or Register  to view this content.

Please Login or Register  to view this content.

Good luck.
Tony

[bluesurger]

Hi Tony,

Is it possible to read out the path of the open file and save it there as. pdf????

"C:\????\.pdf"

[ARGK]

Hi
Try this code:

Please Login or Register  to view this content.

Please Login or Register  to view this content.

Good luck.
Tony

[bluesurger]

hi Tony

doesn' t work.

Runtime error, Dokument not saved

If i Use this. It save the macro, but as "& aWkb & .pdf" in the Document Library. Not with the filename in the File from the Excelsheet

Please Login or Register  to view this content.

[bluesurger]

hy ARGK.

i got it, the Code is:

Please Login or Register  to view this content.