Option Explicit
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
Const SW_SHOWNORMAL = 1
Sub Ouvrir_pdf_api()
ShellExecute 0, "open", "C:\Nom de ton dossier\Nom de ton document.pdf", "", "", SW_SHOWNORMAL
End Sub