Discussion :

[FredR92]

Bonsoir à tous,

Je cherche à visualiser dans un USERFORM (Excel 2016) les fichiers PDF d'une liste via IExplorer.

Bien que le sujet a déjà été traité par le passé avec une excellente solution proposée par Kiki29 (https://www.developpez.net/forums/d4...e/#post8642126), celle-ci semble ne plus fonctionner.

Y aurait-il quelqu'un sur le forum qui aurait une nouvelle solution qui fonctionne?

Un très grand merci par avance pour votre aide et très bonne soirée.

Frédéric

Classeur1.xlsm

[jurassic pork]

hello,
étonnamment, lorsque j'ouvre un pdf avec le formulaire du classeur, il est affiché par acrobat reader dans le contrôle Internet Explorer :


une sorte de plugin ?

Ami calmant, J.P

[FredR92]

Bonsoir Jurassic Pork,

Je te remercie d'avoir pris le temps d'avoir examiné mon problème.

J'ai une bizarerie que je ne comprend pas. En effet, lorsque j'ouvre le USERFORM, l'affichage du PDF ne se fait pas. Voilà ce que j'ai à l'écran:



Et après plusieurs tentatives (le nombre de tentatives étant aléatoire d'un test à l'autre), j'arrive à visualiser le fichier:



Je ne comprend pas d'où peut venir le problème.

As-tu une idée?

Frédéric

[Valtrase]

Salut,
Dans un premier temps mets à jour Adobe Acrobat Reader Téléchargez Adobe Acrobat Reader : visionneuse PDF gratuite

Ensuite mets à jour Internet explorer, cela résoudra peut-être tes soucis.

[jurassic pork]

Hello,
comme le dit Valtrase il faut le bon Acrobat Reader.
Sinon pour pouvoir afficher internet explorer sous windows 11 :
créer un fichier ie.vbs et mettre dedans :

Code :

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

CreateObject("InternetExplorer.Application").Visible=true

Lancer ce fichier.
Vérifier la version d'Internet Explorer dans une invite de commande taper

Code :

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

reg query "HKEY_LOCAL_MACHINE\Software\Microsoft\Internet Explorer" /v svcVersion

Moi j'obtiens
HKEY_LOCAL_MACHINE\Software\Microsoft\Internet Explorer
svcVersion REG_SZ 11.1.22621.0

Pour la version d'Adobe Reader, dans le menu d'Internet Explorer choisir Gérer les modules complémentaires
Afficher tous les modules complémentaires et cliquer sur Adobe PDF Reader :


[EDIT] L'aspect du lecteur PDF dans la capture de FredR92 ne ressemble pas au mien et à celui de Valtrase.

Ami calmant, J.P

[Valtrase]

Re,
Bon pour être sûr je suis passé sous Windows 11, celui-ci nous réservant toujours des surprises...
Mais non cela fonctionne sur cette plateforme aussi.
Pièce jointe 647963

[goninph]

Bonjour,

J'utilise ce logiciel qui est une bombe pour travailler les pdf et c'est le seul qui m'affiche les pdf dans le contrôle WebBrowser

PDF-XChange Editor : https://pdf-xchange.eu/pdf-xchange-editor/

Tout fonctionne et j'ai testé avec les versions gratuit et payante

Par contre sur mon PC Windows Pro, a chaque ouverture de pdf dans le contrôle WebBrowser, je dois à chaque fois cliquer sur afficher, ce qui n'est pas le cas sur la Microsoft Surface Go 2 - 10 pouces et Windows Famille

Je vais vérifier prochainement avec la Microsoft Surface PRO 13 pouces et Windows PRO

Est-ce que l'un d'entre vous aurait une idée du paramètre Windows à modifier pour ne plus afficher cette boîte de dialogue ?

Meilleures vœux pour cette nouvelle année

[patmeziere]

bonjour à tous
l'intallation de adobe reader installe le plugin pour IE normalement
vous n'avez rien a faire
ceci dit comme IE a été abandonné depuis un certain temps il est fort possible que le plugin ne soit plus dans le pack d’installation du reader il vous sera alors utile de retrouver une plus ancienne version de reader
ce que j'ai fait
sans ça le navigate dans le webbrowser vous crée un blob de téléchargement

[goninph]

Bonjour,

Est-ce que l'un d'entre vous aurait une idée du paramètre Windows à modifier pour ne plus afficher cette boîte de dialogue ?

[patmeziere]

bonsoir
tu a ce dialog par ce que tu n'a pas le plugin compatible IE(qui fonctionne aussi dans un webbrowser control dans les userforms )
et ça tu n'y peut rien

[goninph]

Sur mon PC j'ai cette boîte de dialogue, mais pas sur la Microsoft Surface GO 2 😭

[jurassic pork]

hello,
un truc qui marche chez moi . Dans un fichier html (visu.html) j'ai mis :

Code html :

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

1
2
3
<html>
<iframe src="d:/temp/test.pdf" width="600" height="500"></iframe>
</html>

et j'appelle le fichier html avec la commande de l'activeX webBrowser dans le VBA

Code :

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

WebBrowser1.Navigate ("D:/temp/visu.html")

le PDF s'affiche bien dans l'activeX.

Ami calmant, J.P

[patmeziere]

Bonsoir jurassic pork

c'est bonnet blanc blanc bonnet

SI il n'a pas un plugins preview compatible IE il ne pourra pas avoir le pdf même dans un iframe

pour les testS j'ai désinstallé pdf reader qui installe le plugin compatible IE


Rien à voir avec le navigate directe sur le pdf ou par un fichier html avec un embed
si il n'a pas le plugin compatible IE c'est mort mort mort
car le control webbrowser est issue de la librairie IE
c'est pas plus compliqué que cela

[goninph]

Je me suis mal exprimé, tout fonctionne sur mon pc et sur la surface GO 2
La seule différence c'est que sur mon PC j'ai cette boîte de dialogue sur laquelle je dois chaque fois cliquer sur ouvrir et le pdf s'ouvre dans le webbrowser

Il y'a pdfxchange sur les 2 machines


J'aimerai que cette boîte de dialogue ne s'affiche plus

Bonne soirée

[jurassic pork]

Hello,
en tout cas moi ça fonctionne avec PDF-XChange Editor qui installe le plugin pour IE.
Est-ce que le plugin est bien installé et activé dans ton Internet Explorer ?


Et les options de sécurité sont-elles les mêmes entre le poste où tu as le message et celui où tu ne l'as pas.

Ami calmant, J.P

[goninph]

Bonjour,

Les options de sécurité dans Excel sont les mêmes entre le PC et la Surface Go 2

Par contre, il me semble qu'Internet Explorer n'est pas présent sur mes PC

J'ai Google Chrome et Edge que je n'utilise jamais

Je n'ai pas compris à quel endroit je dois vérifier les paramètres ci-dessous 😢, car mon PC me pose toujours la question

Bonne nouvelle, sur la Surface Pro 10 for Business je n'ai pas l'avertissement 👌et je rien paramétré de particulier

Bonne soirée

[jurassic pork]

Hello,
pour faire apparaître internet explorer utiliser ce code :

Code :

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

1
2
3
4
5
Sub AffichageIE()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
End Sub

Dans la fenêtre qui s'ouvre cliquer sur la roue crantée en haut à droite et choisir options Internet
Dans la fenêtre qui s'ouvre cliquer sur l'onglet Programmes et cliquer sur Gérer les modules complémentaires -> vérifier que cela est correct.
Pour la sécurité cliquer sur l'onglet Sécurité et vérifier qu'il y a la même chose entre une machine qui fonctionne et celle qui ne fonctionne pas.
Ami calmant, J.P

[goninph]

Hello,

Les paramètres demandés ci-dessous sont les mêmes entre les 2 machines, c'est à ne rien y comprendre

Bon weekend et encore merci