How to save report as PDF in certain folder

[kassem]

Hi all,



I want to save the current report open as a pdf in a designated folder but am not sure how.

I found the following code that saves it as a pdf but u have to select the location, how can i automate this.

DoCmd.OutputTo acOutputReport, "R_RptByRevdDate", acFormatPDF, , , , , acExportQualityPrint

Thanks

[ranman256]

When you TYPE the "DoCmd.OutputTo" command, VBA will show you all the parameters you need to fill in.
(it wont work by pasting the code)

But the next param after format is filename...

DoCmd.OutputTo acOutputReport, "R_RptByRevdDate", acFormatPDF, "c:\my folder\MyRpt.pdf"

[kassem]

Thanks a million, One last question. Instead of MyRpt can I change the code somehow to use the name stored in a string variable i created called NameOfReport.

[ranman256]

yes, variables work too.

[ItsMe]

You just need to concatenate the string.

Declare your string variable
Dim NameOfReport as string

initialize
NameOfReport = ""

Set its value
NameOfReport = Me.ControlName

Include the variable by concatenating it in your string

DoCmd.OutputTo acOutputReport, "R_RptByRevdDate", acFormatPDF, "c:\my folder\" & NameOfReport & ".pdf"