Ouvrir fichier pdf d'une cellule excel 2007

[bimer]

Bonsoir à toutes et à tous,

Quelqu'un pourrait-il m'aider à résoudre cette difficulté ?

J'ai saisi des données relatives à des articles dans une feuille excel et je voudrais lorsque je clique sur la cellule contenant le titre du document, le document pdf s'ouvre dans une autre fenêtre, afin de pouvoir le consulter.

Si quelqu'un peut m'apporter la réponse.

Merci d'avance et très bonne soirée.

 

[fhoest]

Re : Ouvrir fichier pdf d'une cellule excel 2007

Bonjour
voici un code qui te permettra d'ouvrir ton fichier pdf:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
RunPDFWithExe (Target.Text)
End Sub

Function RunPDFWithExe(ByVal Myfile As String)
On Error Resume Next
Dim MyPath As String
MyPath = "C:\Program Files\Adobe\Reader 9.0\Reader\AcroRd32.exe"
Shell MyPath & " " & Myfile, vbNormalFocus
End Function

A+

 

[bimer]

Re : Ouvrir fichier pdf d'une cellule excel 2007

Merci beaucoup.

Excellente soirée.