Bonjour,
Je suis bloqué, j'ai un moteur de recherche par mot clé qui va chercher les informations dans les différents ongles du classeur excel mais je n'arrive pas à ouvrir le fichier PDF par rapport à ma recherche.
Est-il possible de me dire ou cela coince.
Private Sub CommandButton2_Click()
With ListBox1
shname = .List(.ListIndex, 0)
Set cel = Sheets(shname).Range(.List(.ListIndex, 1))
Lien = cel.Hyperlinks(1).Address
End With
Set ie = CreateObject("internetexplorer.application")
ie.Visible = True
ie.Navigate Lien
Set ie = Nothing
End Sub
Merci
Le fichier en pièce jointe