Save reports as unique files

[Bobk]

I have the task of generating a monthly vendor report which consists of bar
charts showing quality and ontime ratings. I have suceeded in automatically
printing the charts for each vendor, but I would like to save the charts and
ultimately convert them to pdf's. I want to automatically save each chart by
vendor number. I am currently able to generate the charts using:
DoCmd.OpenReport "rptReportCard", acViewNormal
This ends up printing a hardcopy which gets mailed to the vendor. I want to
change this to where I automatically name each chart by vendor number and
save it and then email or fax it to my vendors. Is there a way to do this?
Can I do an automatic "save as" naming each chart with the corresponding
vendor number?

 

[June7 via AccessMonster.com]

I know that changing some report settings with code requires the report to be
open in Preview or Design view. I have reports open up in Preview so I can
change the destination printer tray.

What you want to do is copy the report with a new name. Check out DoCmd.
CopyObject, maybe it will accomplish what you want. Drawback is you get a
huge collection of reports in your project unless you plan to periodically
purge them to PDF format.

Alternatively, could follow the hard copy print with an immediate print to
PDF. Believe setting printer destination will require procedure similar to
what I described about setting destination printer tray. I use
Application.Printer.DeviceName Like "*HP4K*"
to test which printer is destination then set the destination tray with
Reports(strReport).Printer.PaperBin = 2

So check out the Printer collection.

 

[Bobk]

Thanks for the input.

I have discovered another way to do what I wanted to do. The
"DoCmd.OutputTo" will work. I wrote the following code which sends the
report "rptReportCard" to the folder "VRC-TEST" in My Documents. It is
renamed to the customer number held in Qvendnomdonly and formatted to SNP.

DoCmd.OutputTo acOutputReport, "rptReportCard",acFormatSNP,
"C:\DOCUMENTS AND SETTINGS\user\My Documents\VRC-TEST\" & Me.Qvendnomdonly
& ".snp", False

Now, if I can get the report formatted to PDF and then save and email or fax
automatically I will have totally automated the process.

 

[Steve]

Take a look at lebans.com. He has a way of converting reports to PDF. See if
that will work for you.

Steve
(e-mail address removed)