Ouverture fichier PDF

[gg13]

Bonjour à tous.
Je voudrai ouvrir un fichier .Pdf depuis un USF,j’arrive bien à ouvrir le fichier
mais il apparaît sous forme de hiéroglyphiques sur un fichier Excel et non pas en fichier PDF.
Quelle est la recette ?
Merci de vos infos si vous connaissez la réponse.
GG13

 

[MichelXld]

Re : Ouverture fichier PDF

bonjour


Quelle méthode utilises tu actuellement?


Tu peux essayer

ThisWorkbook.FollowHyperlink "C:\le fichier.pdf"

Bon apres midi
MichelXld

 

[gg13]

Re : Ouverture fichier PDF

Salut Michel
Merci de ta réponse.
J'utilise
Dim TheFullPath As String
TheFullPath = Répert & "\" & Title
ThisWorbook.FollowHyperlink TheFullPath, NewWindow:=True

Mais ça bugge sur
ThisWorbook.FollowHyperlink TheFullPath, NewWindow:=True
Je ne sais pas pourquoi.

Merci de ton aide
GG13

 

[MJ13]

Re : Ouverture fichier PDF

Bonjour gg13 et MichelXLD

Voici un exemple à adpater pour ouvrir des fichiers suivant leur extension.

Salutations
Michel

 

[gg13]

Re : Ouverture fichier PDF

Resalut Michel , MJ13
Merci pour le fichier je vais l'essayer dés que possible
je suis un peu short maintenant.
Bonnes fêtes à tous.
GG13

 

[gg13]

Re : Ouverture fichier PDF

Re re bonjour
Aprés légère personalisation à ma config la routine marche trés bien.
Merci encore