Mass print PDF files based on file path and quantity in excel document.

[sam55]

I have a excel list with 2 columns. One for the local path to the PDF file and the other the print quantity. (see example below) I’m looking for a way to mass print the first pages of each PDF for the number of pages listed on the excel sheet.

Path	Print quantity
C://Test1.pdf	10
C://Test2.pdf	50
C://Test3.pdf	5

 

[DanteAmor]

Check if the following works for you.
Check on your computer which version of Acrobat (AcroRd32.exe) you have to print PDF and the path where the program is located ("C:\Program Files\Adobe\Reader 11.0\Reader\").

Sub PrintPdfs()
  Dim i As Long, j As Long, wFile As String, wPath As String, wnum As Variant
 
  wPath = "C:\Program Files\Adobe\Reader 11.0\Reader\"
 
  For i = 2 To Range("A" & Rows.Count).End(xlUp).Row
    wFile = Range("A" & i).Value
    wnum = Range("B" & i).Value
    If wFile <> "" Then
      If Dir(wFile) <> "" Then
        If wnum > 0 And IsNumeric(wnum) Then
          For j = 1 To wnum
            Shell wPath & "AcroRd32.exe /n /t " & wFile
            DoEvents
            Application.Wait Now + TimeValue("00:00:01")
          Next
        End If
      End If
    End If
  Next
End Sub

 

[QuietRiot]

The hardest part is getting it to only print the first page. I don't think you can select pages to print using shell, but if you have Adobe Acrobat (not reader actual acrobat) installed you could use that reference and set it to print specific pages.