Open pdf file from excel vba?

[tinkythomas]

I'm trying to open a pdf file from within excel vba. I have tried using the followhyperlink method but adobe acrobat opens very briefly then immediately closes

Sub OpenPDF()

'Dim pdf As String

    On Error Resume Next

    'pdf file to open
    pdf = "K:\PDF\mypdf.pdf"

    'open the pdf file
    ActiveWorkbook.FollowHyperlink pdf

End Sub

So then I tried to create an instance of acrobat by setting a reference to the acrobat object but I can't get this to work either!

The code I'm using is

Sub OpenPDF()

    Dim pdf As AcroPDDoc
    Dim strPDF As String

    Set pdf = CreateObject("AcroExch.PDDoc")
    
    'pdf file to open
    strPDF = "K:\PDF\mypdf.pdf"

    'open the pdf file
    pdf.Open strPDF

End Sub

Any ideas what could be wrong with either approach?

Thank-you

 

[Tarkan VURAL]

right click and print active pdf document

 

[Kathleen0422]

I have over 900 documents to print. Is there a way to do this systematically using the great code that you have provided already vs right clicking and printing?

 

[tacticaltrading]

I have over 900 documents to print. Is there a way to do this systematically using the great code that you have provided already vs right clicking and printing?

Bump.
A solution here would be great
Thx