Ouvrir un fichier PDF via Excel/VBA

Bonjour,

Après de nombreuses recherches sur internet, je ne tombe que sur des sujets parlant de l'ouverture de fichiers excel ou word mais rien sur l'ouverture d'autres fichiers comme PDF.

J'aimerai savoir s'il était possible d'ouvrir un fichier, et comment avec l'application respective (pour un PDF c’est adobe reader par exemple)

J'ai tenté le bon vieu :

Sub ouvrir()
   lien = Application.Dialogs(xlDialogOpen).Show
   ThisWorkbook.FollowHyperlink lien
End Sub

Mais ça marche pas top.

Merci d'avance pour votre réponse,

Jule04

Bonjour,

as-tu vraiment cherché, sérieux ?‼ Et avec « ça marche pas top » on est bien avancé !

Sinon avec un peu de jugeote - en tout cas sur Windows - mieux vaut utiliser

une procédure ouvrant un fichier dans l'application par défaut correspondant à son type :

Sub DocOpen(FICHIER$)
On Error Resume Next
CreateObject("WScript.Shell").Run CreateObject("Scripting.FileSystemObject").GetFile(FICHIER).ShortPath
End Sub

Oui, j'ai cherché sérieux ?!!!

"Ca marche pas top", façon détournée de dire que ça ne fonctionne pas.

Sub DocOpen(FICHIER$)
On Error Resume Next
CreateObject("WScript.Shell").Run CreateObject("Scripting.FileSystemObject").GetFile(FICHIER).ShortPath
End Sub

Excuse moi, je dois pas avoir de jugeote pour ne pas connaitre ce genre de procédure.

Merci tout de même de la réponse,

Je test ça,

bonne soirée.