Print 1st page of PDF

[iPrank]

Something like this should work:

Private Sub Command1_Click()
    AcroPDF1.LoadFile "C:\MyPDFFile.pdf" 'Load a file
    AcroPDF1.printPages 1, 1 'Print first page
End Sub