Converting multiple reports to PDF

[Jacinda]

All of you have been so helpful that I thought I might share my little bit of
code that I used to convert three access reports into one PDF file:

Using http://www.lebans.com/reporttopdf.htm for my conversion, I created a
button on my form that has the following code

Dim blRet As Boolean
Dim sMaster As String
Dim sChild As String
Dim schild2 As String


Me.lstRptName = "racktodaypreview1"
blRet = ConvertReportToPDF(Me.lstRptName, vbNullString, _
"x:/ACK.pdf", False, False, 150, "", "", 0, 0, 0)

Me.lstRptName = "rshippingpaper"
blRet = ConvertReportToPDF(Me.lstRptName, vbNullString, _
"x:/SHIP.pdf", False, False, 150, "", "", 0, 0, 0)

Me.lstRptName = "RshoptodayW"
blRet = ConvertReportToPDF(Me.lstRptName, vbNullString, _
"x:/WHITE.pdf", False, False, 150, "", "", 0, 0, 0)



sMaster = "x:\ack.pdf"
sChild = "x:\ship.pdf"
schild2 = "x:\white.pdf"

blRet = MergePDFDocuments(sMaster, sChild)
blRet = MergePDFDocuments(sMaster, schild2)

Application.FollowHyperlink sMaster

This is really nice because it will merge the three reports into one pdf
file that can then be sent via e-mail to our other branches...even though
it's put together with a band-aid it works!
---Jacinda