converting reports to PDF

[oldroboman]

This is a sort of follow on from my previous posts, I am trying to convert the 30 odd files to PDF (they all form a complete single report at the end), i can do a loop to do this but its slow and click intensive, for each report in the loop below, the save as dialog appears and also acrobat opens and shows the file, is there a way to make this faster, ie, removing the save as dialog and not showing the acrobat preview? or alternatively does anyone know how to contol the acrobat printer ?

Sub cmdPDF()
MsgBox ("still under test")
DoCmd.RunCommand acCmdSaveRecord
On Error GoTo Err_cmdPrintRep_Click
    Dim stDocName As Variant
    Dim i As Variant
    Dim stLinkCriteria As String
    Dim tmpPrinter As Printer
    Dim FileName As String
Set tmpPrinter = Application.Printer 'Default Printer
Set Application.Printer = Application.Printers("Adobe PDF")     'Change the application printer to adobe
FileName = "C:\AdobePDF\"
stDocName = Array("Page1", "Page1a", "Page2", "Page3", "Page4", "Page5", "Page6", "Page7", "Page8", _
                "Page8a", "Page9", "Page9a", "Page10", "Page11", "Page12", "Page13", "Page14", _
                "Page15", "Page15a", "Page16", "Page17", "Page18", "Page18a", "Page19", _
                "Page19a", "Page20", "Page20a", "Page21", "Page21a", "Page22", "Page23", "Page24", _
                "Page25", "Page26", "Page27", "Page27a", "Page27b", "Page28", "Page29", "Page30")
stLinkCriteria = "[InspectionID] =" & Forms![Booking Form]![InspectionID]
 
    For Each i In stDocName    
    DoCmd.OpenReport i, acNormal, , stLinkCriteria      
    DoCmd.Close acReport, i
    Next i
 
Set Application.Printer = tmpPrinter 'printer back to default
 
Exit_cmdPrintRep_Click:
    Exit Sub
 
Err_cmdPrintRep_Click:
    MsgBox ("Report Does not Exist")  'Err.Description
    Resume Exit_cmdPrintRep_Click
 
End Sub

as you can see its essentially the same routine as the report one (moving the stlinkcriteria as suggested by earlier posts (thanks) but with printer changed to Acrobat at the start and reverted back to default printer at the end.

[oldroboman]

A follow on from above, Ive no switched to testing PRIMO PDF, which gives me less keystrokes and nothing much on screen, so less intensive than previous try, has anyone had experience of PRIMO PDF, mostly I would like to automate pressing the enter key to get rid of the primo print dialog. or stop it from appearing, that will make the whole thing automatic. or do i dream ....
thanks

[NeoPa]

As this is essentially third-party software, I suggest you may like to check on their web site for help in this matter. I have no experience with PRIMO and I doubt many here do. I expect the vendors have covered this area many times before though.
Good luck.

[oldroboman]

As this is essentially third-party software, I suggest you may like to check on their web site for help in this matter. I have no experience with PRIMO and I doubt many here do. I expect the vendors have covered this area many times before though.
Good luck.

As a tidy up to this, I have now gone on to use eDocPrinter PDF pro, this is good because it also has its own pdf merge called Drag2PDF, these two together have solved the problem and have also removed the need for the full Adobe Acrobat to be put on other machines that the database is using, they only need the reader as the Drag2PDF does the merging of my 30 reports into one with ease.

thanks for the suggestions and help to the end result. ta

[NeoPa]

Sounds like a good solution. Thanks for posting it :)

[puppydogbuddy]

Sounds like a good solution. Thanks for posting it :)

Adrian,

Thought I would mention this link to Tony Toews web site in case you have not seen it. I've used Lebans method and everything that Tony said is true.

http://www.granite.ab.ca/access/pdffiles.htm

[NeoPa]

Looks like a good resource. Nice one :)