Gestion de la taille du document dans un webBrowser
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
Code:
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 |
Si quelqu'un a une solution pour afficher également les pdf en ajustant la taille en largeur , je suis preneur.
Merci le forum pour votre aide
