Opening a pdf with VBA in MS Access

  • Thread starter Thread starter Rich
  • Start date Start date
R

Rich

I have a table in Access which contains a filepath and filename to open
either word or pdf documents. I use the following code (which works fine) to
open word documents:

Set oApp = CreateObject("Word.Application")
oApp.Visible = True
oApp.Documents.Open filepath & "\" & filename

I want to be able to use some similar code to open a pdf document. There
will be several users of this database. All will have acrobat but I cannot
guarantee it will be located in exactly the same place so I need something
that works similar to the above coding which is universal.

Anyone?

Rich
 
Try:
FollowHyperlink filepath & "\" & filename

That should open the document in whatever program is registered to handle it
on the user's computer, e.g. Acrobat Reader for pdf, or Word of doc.
 
I have a table in Access which contains a filepath and filename to open
either word or pdf documents.  I use the following code (which works fine) to
open word documents:

    Set oApp = CreateObject("Word.Application")
    oApp.Visible = True
    oApp.Documents.Open filepath & "\" & filename

I  want to be able to use some similar code to open a pdf document.  There
will be several users of this database.  All will have acrobat but I cannot
guarantee it will be located in exactly the same place so I need something
that works similar to the above coding which is universal.

Anyone?

Rich
Click to expand...


Rich,

The answer to your question will be found here:

http://www.mvps.org/access/api/api0018.htm


Chris Nebinger
 
Try:
    FollowHyperlink filepath & "\" & filename

That should open the document in whatever program is registered to handle it
on the user's computer, e.g. Acrobat Reader for pdf, or Word of doc.

--
Allen Browne - Microsoft MVP.  Perth, Western Australia
Tips for Access users -http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.








- Show quoted text -
Click to expand...

I've noticed sometimes problems with using "followhyperlink".
an alternative is
Shell strPDFReader & " " & strFilenaam, vbMaximizedFocus


regards
Patrick
 
I have a table in Access which contains a filepath and filename to open
either word or pdf documents.  I use the following code (which works fine) to
open word documents:

    Set oApp = CreateObject("Word.Application")
    oApp.Visible = True
    oApp.Documents.Open filepath & "\" & filename

I  want to be able to use some similar code to open a pdf document.  There
will be several users of this database.  All will have acrobat but I cannot
guarantee it will be located in exactly the same place so I need something
that works similar to the above coding which is universal.

Anyone?

Rich
Click to expand...
 
I've noticed sometimes problems with using "followhyperlink".
an alternative is
Shell strPDFReader & " " & strFilenaam, vbMaximizedFocus


That won't work properly if strPDFReader or strFilenaam contain spaces. It
should be

Shell """" & strPDFReader & """ """ & strFilenaam & """",
vbMaximizedFocus

That having been said, I've never had a problem with FollowHyperlink.
 
Back
Top