Je voudrais ouvrir un fichier PDF à parti de son nom stocké dans une cellule d'une feuille EXCELL par une liste déroulante (COMBO BOX)
La cellule ou est stocké le nom du fichier à ouvrir s'appelle "Essai"
J'ai essayé la solution ci après dans une MACRO mais elle ne fonctionne pas
Sub OpenWordV02()
Dim Val As String
Val = Range("Essai").Value
ThisWorkbook.FollowHyperlink "C:\Users\Jean Louis\Documents\Essai ouverture fichier\Val.pdf"
End Sub
Re : Ouvrir un fichier PDF à partir d'une feuille EXCELL
Bonjour ergastule, le fil, le forum Je ne pense pas que *.* fonctionne, mais as tu essayé ? A mon avis il faut que le chemin du lien pointe sur une adresse complète et existante (donc pas approximative). Il vaudrait mieux mettre l’extension dans la variable (donc dans la cellule "Essai") en mettant Toto.txt par exemple. Ce qui donnera
VB:
ThisWorkbook.FollowHyperlink "C:\Users\Jean Louis\Documents\Essai ouverture fichier\" & Val
Mais je peux me tromper, d'autres pourront nous le dire
Re : Ouvrir un fichier PDF à partir d'une feuille EXCELL
cette solution marche
je rentre le nom du fichier dans une cellule
je rentre l'extension dans une autre
j'applique CONCATENATE des 2 valeurs que je met dans la cellule ESSAI avec la liste déroulante qui me permet de rechercher les fichiers.
et je conserve l'écriture proposée.