Lien vers une page précise d'un document

Private Sub OuvrirPDF2()
Dim WshShell As Object, PDFExec As Object
Dim CheminReader As String, CheminPDF As String

    CheminReader = "C:\Program Files (x86)\Adobe\Acrobat Reader DC\Reader\AcroRd32.exe" 'adapter le chemin d'Adobe sur votre pc
    CheminPDF = "C:\chemin.pdf" 'adapter le chemin du pdf
 
    Set WshShell = CreateObject("WScript.Shell")
    Set PDFExec = WshShell.Exec(CheminReader & " /a page=" & "9" & "=OpenActions " & CheminPDF) 'mettre le numéro de page ici 9
 
    Set PDFExec = Nothing
    Set WshShell = Nothing
 
End Sub