Discussion :

[croky23]

Bonjour le forum

Je possède + de 1000 fiches en pdf qui se trouve dans un dossier "x"
Je voudrais à partir d'une feuille excel ouvrir ces doc pdf

à partir d'une liste (validation de données /liste ou à partir d'une zone de liste modifiable dans un userform))comprenant les noms des fichiers pdf cliquer dessus et que automatiquement cela me cherche mon fichier pdf dans le dossier "X" et me l'ouvre.
Est ce possible et si oui comment faire
merci de votre aide

[jfontaine]

Bonjour,

Une méthode pour ouvrir un PDF

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ThisWorkbook.FollowHyperlink "D:\Monfichier.pdf"

Il te suffit de remplacer le nom du fichier par la sélection de la listbox

[kiki29]

Salut, une autre approche via la liste et la création de liens des fichiers pdf contenus dans un dossier racine et ses sous dossiers,sans doute à adapter, comme cela tu auras le choix

[croky23]

merci de votre aide

j'ai mis un code qui à l'air de fonctionner

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Dim Monfichier As Variant
 
 
Private Sub ComboBox1_Change()
Me.TextBox1 = Me.ComboBox1
End Sub
 
Private Sub TextBox1_Change()
Monfichier = Me.TextBox1
ThisWorkbook.FollowHyperlink "C:\Users\jean-luc\Documents\" & Monfichier & ".pdf"
End Sub

je suis débutant et je vous le donne à tester
merci

[jfontaine]

Tu peux tout mettre dans un seul événement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Private Sub ComboBox1_Change()
 
Me.TextBox1.Text = Me.ComboBox1.Text
ThisWorkbook.FollowHyperlink "C:\Users\jean-luc\Documents\" & ComboBox1.Text & ".pdf"
 
End Sub

[croky23]

merci beaucoup