Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
Comme indiquer dans le titre du sujet, je suis à la recherche d'une macro me permettant l'ouverture d'un fichier .pdf se trouvant à la racine du dossier de mon fichier excel.
Sub Essai()
ThisWorkbook.FollowHyperlink ThisWorkbook.Path & "\Essai.pdf"
End Sub
je viens de découvrir quelque chose de très curieux ! 😱😱😱
je croyais qu'il n'y avait aucune différence entre une sub lancée via Alt F8(fenêtre Macro) et la même sub lancée par un raccourci clavier(par exemple Ctrl e) ; or avec la sub ci-dessus : via Alt F8, no problem : le fichier Essai.pdf s'ouvre direct dans mon logiciel Acrobat Reader DC ; avec Ctrl e : au lieu de faire pareil, avant d'ouvrir le fichier, ça ouvre cette fenêtre pour choisir la langue :
avez-vous une explication là-dessus ? y a-t-il un moyen d'éviter l'apparition automatique de cette fenêtre ?
ben comme je m'adresse en premier à vous deux, patrick et toi, je commence par vous saluer, par politesse (sinon je sais que vous allez vous vexer ! 😜) ; et ça serait quoi, ton moyen ? (à part désinstaller Reader et le réinstaller ! 😂)
MDR !!! 🤣 🤣 🤣 j'voulais une solution, mais j'ai pas pensé une seule seconde qu'il faudrait upgrader mon Excel !!! ben alors tant pis, j'reste avec l'inconvénient d'la fenêtre du choix de langue, mon Excel 2007, et mon Windows 7 ; merci quand même pour ta proposition. 😉
j'espère que Microsoft pourra survivre et ne pas péricliter sans que j'lui achète Windows 10 et Office 2019 ! 😂 😁
et bien moi c'est ctrl F8 qui me donne le message de langue
et pourtant je n'utilise pas follow....k
et ctrl +e c'est pour exporter le module
perso j'utilise une de ces deux
VB:
Sub Essai()
Dim MonApplication As Object
Set MonApplication = CreateObject("Shell.Application")
MonApplication.Open ("C:\Users\polux\DeskTop\Test.pdf")
Set MonApplication = Nothing
End Sub
Sub essai2() 'legerement plus rapide
On Error Resume Next
Set objShell = CreateObject("WScript.Shell")
objShell.Run ("C:\Users\polux\DeskTop\Test.pdf")
'avec ".Run" il faut preciser l'application avec le quel tu ouvre le fichier
End Sub
merci pour tes infos. 🙂(je parlais de Ctrl e depuis Excel, pas depuis l'Éditeur VBA ! 😜)
c'est dommage qu'il n'y a pas un paramètre de ligne de commande d'Adobe Reader pour pouvoir spécifier la langue ; j'ai cherché sur le net, mais j'ai pas trouvé. 😕
un truc du genre : /lang=fr_FR ou /lang=fr ; ou même /fr
car si on peut spécifier la langue sur la ligne de code VBA qui ouvre le fichier pdf, la fenêtre du choix de langue ne devrait plus apparaître. (même avec Excel 2007)
=>soan
C'est ce que j'avais fait (dès le message#5)
Et je confirme:
Cette fenêtre n'apparait pas dans tous les cas
CTRL+E
F5
CTRL+F8
F8
macro affectée à un bouton
c'est vraiment bizarre ! à partir de l'Éditeur VBA :
* avec F5 et F8 : ok : pas de fenêtre de langue
* via un bouton : pas de fenêtre de langue
* avec Ctrl F8 :
donc la fenêtre apparaît avec Ctrl F8 ou via un raccourci clavier comme Ctrl e ; à tout hasard, j'ai choisi une autre lettre : Ctrl d ; ça fait pareil que pour Ctrl e : la fenêtre de langue apparaît aussi ; bon, ben le plus simple, c'est de lancer la sub via Alt F8.
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD