Bonjour à tous
Je reviens vers vous pour m'aider dans un petit souci avec un WebBrowser
Dans un userform, j’utilise ce webbrowser pour afficher des documents . Soit en PDF soit en JPG
Pour faciliter l'affichage de ces documents, je voulais que celui-ci soit toujours afficher à 100% de la largeur, et donc utilisation du scrol pour la hauteur
J'ai trouvé ce code qui fonctionne très bien mais uniquement pour les images, et du coup j'ai une petite croix noir pour les PDF
Si quelqu'un a une solution pour afficher également les pdf en ajustant la taille en largeur , je suis preneur.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 With WebBrowser1 .Navigate "about:blank" Do While .ReadyState < 4: DoEvents: Loop lblNomActuel = txtChemin & "" & lstFichiers.List(lstFichiers.ListIndex) style = "display:block;margin-left:auto;margin-right:auto" .Document.Write "<img id='MyImg' style=""" & style & """ src='" & lblNomActuel & "'>" Set Img = .Document.GetElementById("MyImg") If Img.Width > .Document.body.ClientWidth Then Img.style.Width = "100%" If Img.Height > .Document.body.ClientHeight Then Img.style.Height = "100%" Set Img = Nothing End With
Merci le forum pour votre aide
Partager