I suppose another work around would be to just open the folder where the file is located rather than opening the file.It is unfortunately not so simple to convert *anything* into pdf. So having users simply tab back to Access is much more desirable than having to press merge jobs, continue, enter the correct path, etc.Īlso, for some odd reason, after the jobs have been merged, when I try to close the newly opened file, it just hangs. This works perfectly, but the only issue is when the macro is done, the focus is stuck on Adobe Acrobat, and not switched back to Access. MsgBox "Please press OK after all PDF files are sent to print queue", vbOKOnly, "Pause" I'm sure there is a better pause command, just not sure what it is.įor the time being, I inserted a msgbox just above the ".mergealljobs" line reading, To replicate this, I tried inserting a pause command "sleep(2000)" for example to wait 2 seconds (and tried other numbers, but not quite yet there). then, when I resume, it merges them all seamlessly. if click on the line that reads ".mergealljobs" creating a stopping point whereby the line turns maroon (not sure what the correct terminology is for that), and then run the macro, the script then goes through and adds the files to the PDFCreator print queue.
Thanks again for looking deeper into this, much appreciated!Īlong those lines, I stumbled upon a possible solution. SetProfileSetting "ShowProgress", "false" SetProfileSetting "OpenWithPdfArchitect", "false" SetProfileSetting "Printing.SelectPrinter", "SelectedPrinter"
SetProfileSetting "Printing.PrinterName", "PDFCreator" If tfKillMergedFile And fso.FileExists(sMergedPDFname) Then Kill sMergedPDFname Set fso = CreateObject("Scripting.FileSystemObject") Sub PDFCreatorCombine(sPDFName() As String, sMergedPDFname As String, Optional tfKillMergedFile As Boolean = True)ĭim oPDF As PDFCreator.PdfCreatorObj, q As PDFCreator.Queueĭim v As Variant, i As Integer, ii As Integer If FileThere("C:\merged_PDF_File.pdf") ThenĪpplication.FollowHyperlink "C:\merged_PDF_File.pdf" I tried using a sendkeys command to work through that, but to no avail. I'm somewhat able to work around that by launching Adobe first, but then the PDFCreator dialogue box appears with all of the jobs queued up. my only roadblock is that once each PDF gets sent to the PDFCreator Print Queue, the macro freezes until I close Adobe Acrobat (using Reader since some of the folks that I support do NOT have Pro). I soon realized that using the VBA code for PDFCreator will merge PDF files, so I can move away from XPS.
Trying this again folks since my prior thread (XPS merging) got zero responses.
0 kommentar(er)
