![]() 'Wait until PDF creator is finished then release the objects 'Combine all PDFs into a single file and stop the printer 'Wait until all print jobs have entered the print queueĭo Until pdfjob.cCountOfPrintjobs = 5 + UBound(PDFList) + 1 'Get Windows' current default printer to set back laterĪpplication.Sheets("Cover").PrintOut copies:=1, ActivePrinter:="PDFCreator"Īpplication.Sheets("Report").PrintOut copies:=1, ActivePrinter:="PDFCreator"Īpplication.Sheets("Raw").PrintOut copies:=1, ActivePrinter:="PDFCreator"Īpplication.Sheets("Final").PrintOut copies:=1, ActivePrinter:="PDFCreator"įor i = LBound(PDFList) To UBound(PDFList) MsgBox "Can't initialize PDFCreator.", vbCritical + _ If pdfjob.cStart("/NoProcessingAtStartup") = False Then Set pdfjob = New PDFCreator.clsPDFCreator coption name to set the "After Autosaving open the document with the default program" to no? This is the only thing I can think of that might be causing this to happen. If no one can help me with this, can someone just tell me the. The VBA script I'm using is below (I'm making several Excel sheets into PDF's, then including other PDFs into the PDF I created with the Excel sheets). It opens and needs to be closed for every file I'm combining if I am combining 5 files, adobe Reader opens 5 times (and needs to be closed before the next of the 5 documents is processed). ![]() ![]() I still have an issue with Adobe Reader opening as a blank application, and needing to be closed in order for the PDF creation to proceed. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |