Discussion :

[casefayere]

Rebonsoir,

je viens donc de trouver pour enregistrer une feuile en pdf mais maintenant j'ai une procédure qui me permet de consulter les fichiers pdf dans une listbox

si je clique sur un des fichiers pdf, excel l'ouvre mais codé
je voudrais qu'il s'ouvre à l'extérieur d'excel avec sa version originale

si vous avez compris et connaissez la solution, merci de vos réponses

[ouskel'n'or]

Tu peux tester

Code :

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

ThisWorkbook.FollowHyperlink Chemin & NOmFich.pdf

[casefayere]

Bonsoir ouskel'n'or

J'avais vu cette réponse, j'ai essayé mais meme problème ça me sort un fichier excel décodé illisible

[fring]

Bonjour,

A tester :

Code :

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

1
2
3
4
5
6
7
Sub test_ouverture_pdf()
Dim Chemin As String
 
Chemin = "C:\Temp\NomFichier.pdf" '<-- chemin complet et nom du fichier
Shell "cmd /c start acrord32.exe """ & Chemin & """"
 
End Sub

[casefayere]

Merci fring,
j'ai testé un truc dans le meme genre, soit

Code :

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

1
2
3
 nom = ListBoxARCHIVES 'represente le chemin complet intégré dans une listbox
    MsgBox nom
    Shell "cmd /c start acrord32.exe ""Nom"""

9a marche presque mais quand adobe s'ouvre, il ne trouve pas mon fichier, c'est mon dernier problème

[casefayere]

Cool,
petite erreur, j'ai corrigé :

Code :

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

1
2
nom = ListBoxARCHIVES 'represente le chemin complet intégré dans une listbox
    Shell "cmd /c start acrord32.exe """ & nom & """"""

Merci beaucoup fring et ouskel'n"or