| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Acrobat Distiller: start if not running
Dear All,
How to check if Acrobat Distiller is running and how to start it before output? Filip 'Save as ' If NOT IsRunning("Acrobat Distiller") then start Acrobat Distiller strPath = FindOutputPath(InterfaceConn, PresentProjectId) 'set printer to print as POSTSCRIPT (PS-file in sub-folder 'IN') 'and the Acrobat-distiller will periodically convert these files into pdf-files in sub-folder 'out' xlApp.ActivePrinter = FindProjectPropertyValue(InterfaceConn, PresentProjectId, "PDFWriter") mysheet.PrintOut Copies:=1, Collate:=True, printtofile:=True, prtofilename:=strPath & "\in\" & strSaveAsName & strOrdClientCode & ".ps" |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Acrobat Distiller: start if not running
Filips,
Look into GetObject & CreateObject. NickHK "Filips Benoit" wrote in message ... Dear All, How to check if Acrobat Distiller is running and how to start it before output? Filip 'Save as ' If NOT IsRunning("Acrobat Distiller") then start Acrobat Distiller strPath = FindOutputPath(InterfaceConn, PresentProjectId) 'set printer to print as POSTSCRIPT (PS-file in sub-folder 'IN') 'and the Acrobat-distiller will periodically convert these files into pdf-files in sub-folder 'out' xlApp.ActivePrinter = FindProjectPropertyValue(InterfaceConn, PresentProjectId, "PDFWriter") mysheet.PrintOut Copies:=1, Collate:=True, printtofile:=True, prtofilename:=strPath & "\in\" & strSaveAsName & strOrdClientCode & ".ps" |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Acrobat Distiller: start if not running
If you are using the distiller print driver, you shouldn't have to worry
about it. -- Regards, Tom Ogilvy "Filips Benoit" wrote in message ... Dear All, How to check if Acrobat Distiller is running and how to start it before output? Filip 'Save as ' If NOT IsRunning("Acrobat Distiller") then start Acrobat Distiller strPath = FindOutputPath(InterfaceConn, PresentProjectId) 'set printer to print as POSTSCRIPT (PS-file in sub-folder 'IN') 'and the Acrobat-distiller will periodically convert these files into pdf-files in sub-folder 'out' xlApp.ActivePrinter = FindProjectPropertyValue(InterfaceConn, PresentProjectId, "PDFWriter") mysheet.PrintOut Copies:=1, Collate:=True, printtofile:=True, prtofilename:=strPath & "\in\" & strSaveAsName & strOrdClientCode & ".ps" |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Printing Multiple Sheets to Acrobat Distiller | Excel Programming | |||
| Problems with Excel XP SP2 and Acrobat Distiller | Excel Programming | |||
| How do I determine the Acrobat Distiller codename? | Excel Programming | |||
| How to detect Acrobat Distiller open | Excel Programming | |||
| How to detect Acrobat Distiller open | Excel Programming | |||
Linear Mode
