Automatically attach a report as a PDF into my email

[myhnews]

I’m currently using a function (that is executed with a click of a button) that selects a report and converts it to a .snp format. Then, it creates a new email and attaches the snapshot file without saving the file in a temp table.

However, not all my customers has snapshot viewer installed. So I would like to change it to PDF.

I understand that PDF is the right way, and I’m willing to pay for a better version. However, I would like to have the option to click a button that converts a report to a PDF and attaches it automatically to a new email. I do not want to select file/Print/select the PDF drive then attaché it manually, and then, change back the Printer drive to the regular.

What would be my next step?
Thank you
Joe

 

[rainman89]

As far as the attaching goes... i cant help you there. but u seem to have a handle on that
onclick of your button

Dim strDefaultPrinter As String
    
    stDocName = "yourreportname"
   
    strDefaultPrinter = Application.Printer.DeviceName
    Set Application.Printer = Application.Printers("youradobeprintername")
        DoCmd.OpenReport stDocName, acNormal
    Set Application.Printer = Application.Printers(strDefaultPrinter)

Will still prompt you to save it to a location.. thats as far as i can take u

 

[Morten R]

Hi, i see its posible to print a report to *pdf. How wil the code be if i want the report to print to a Word document??

I have find this function when the report is in prew modus, is it then posible to make a comand buton wit this function?


M.

 

[rainman89]

print to a .doc?

you mean save the report as a word document?

 

[Morten R]

Reprt to MS Word

Yes send the report to a Word doc. When i open a report i preview i have fond button on the toolbar that send the content in my report to a Word doc.

The question is how i make this function om a form?


M.

 

[RuralGuy]

There is also Stephan Lebans slick solution. I've used it and it works great.