Print and save Pdf report on excel 2007

[Mahir Yagimli]

Hi Everyone,

I tried to use a simple print and save function in VBA, but obviously something is not working. Can you help me out?

What I tried to do is instead of having defined a fixed folderpath, I tried to set a variable for the folderpath and for the pdfname I did the same. So that it will change with the input of the report automatically.

Especially the pdf name I tried to link to the Cell A1.

Hopefully I can get some Inspiration.

Thank you in advance for taking your time to read through this.

 

[Deepak]

Your post doesn't deliver clearly what do you wish to do!!

Check this & share more info on the same.

• You have selected Range("A1:I69").Select where except A1 all are blank cells.
• Following needs to be something like this..
  Activesheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
  fname, Quality:=xlQualityStandard, IncludeDocProperties:= _
  True, IgnorePrintAreas:=False, OpenAfterPublish:=False

 

[webmax]

check this

 

[Mahir Yagimli]

@Deepak: Thank you for your help, but this gives Runtime error '5' on my workbook.

@webmax: Thank you, too for your effort, but it resulted in the same error.

After all this is maybe a bit more complicated then I have thought. Is there a setting, that I forgot?

I appreciate your help and effort.

 

[Deepak]

@ Mahir Yagimli

Which xl is being used for the process as by default this is only supported in =>xl2007 SP2.
For xl2007,2007 SP1: you need to install a tiny add-on from below url.

http://download.microsoft.com/downl...b6-4031-aa98-0a3db7403d0f/SaveAsPDFandXPS.exe

 

[Mahir Yagimli]

@Deepak: That is working wonderfully. You are Great. Thank you.

 

[Deepak]

WoW.....Have Fun!!!!!!

 

[Mahir Yagimli]

Hello,

I have worked a bit with the code and here is one little example that I'd like to share. This Code creates a folder with the foldername of the Cell Value in A1 and prints a pdf in this folder with the pdfname that uses the now function of excel. I thought about using the count function, so that when the program finds out that the file already exists, it will use the same name just with a serial number.

Have a nice day!