Thank you Harlan,
well for whom ever desired to know how to accomplish what it was i
wanted to accomplish with pdfmaker 5 I have found a way to bypass the
annoying popup. Yes its more steps but it works, makes me feel good
that it works and makes my boss happy there for im happy
heres some code for all of you.
Dim GenericReportPsFile As String
Dim GenericReportPdfFile As String
GenericReportPsFile = Application.ActiveWorkbook.Path & "\"
& GenericReportTitle & ".ps"
GenericReportPdfFile = Application.ActiveWorkbook.Path &
"\" & GenericReportTitle & ".pdf"
' Get active printer.
strActivePrinter = Application.ActivePrinter
' Change to the Microsoft Fax printer driver.
'Application.ActivePrinter = "Acrobat PDFWriter on LPT1:"
Application.ActivePrinter = "Acrobat Distiller on Ne01:"
' Print the active document
Selection.PrintOut Copies:=1, printtofile:=True,
prtofilename:=GenericReportPsFile
Dim myPDF As PdfDistiller
Set myPDF = New PdfDistiller
myPDF.FileToPDF GenericReportPsFile, GenericReportPdfFile,
""
' Change back to the default printer.
Application.ActivePrinter = strActivePrinter
Kill GenericReportPsFile
You must include in your references the distiller object.
so you have to print to post script then convert to pdf using
distiller.
now I am looking to figure out how to append to pdf files or to ps
files so that i can add more than one report to my pdf.
Thank You all for your answers.