Hi Carl,

There are a couple of methods you could use.

How are your VBA skills?

1 is to create a button and add this code:

Dim strPath as String
strPath="C:\Path to the PDF document"
Application.FollowHyperLink strPath

You could replace strPath with a Field on your Form, it would have to contain the full path though.

Shorthand would be just
Application.FollowHyperlink "C:\path\FileToOpen.pdf"

--

Another option is using the Shell

strPath = "C:\path\FileToOpen.pdf"
Set shell = CreateObject("WScript.Shell")
shell.Run Chr(34) & strPath & Chr(34), 1, False

To be on the safe side I've added Chr(34) (which is "- double quotes) around the file name in case there are spaces in folder names, this causes issues and the Shell will stop at a space so won't find that full destination.

--

Another option is 'ShellExecute', add this to your Form's code:

Option Explicit
Option Compare Database
 
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
 
Private Const SW_SHOWNORMAL As Long = 1
Private Const SW_SHOWMAXIMIZED As Long = 3
 
'(in the button click event you have chosen:)
 
Private Sub Command1_Click()

Dim strPath as String
strPath="C:\Path to the PDF document"

    ShellExecute 0, "Open", strPath, vbNullString, "C:\", SW_SHOWNORMAL
End Sub

Regards
Alex