Zoomen in WebBrowser1
20.10.2021 13:24:07
Oraculix
Ich habe was tolles gefunden in der Recherche. Ein Code der mir ermöglicht eine Html Datei in eine Userform5 mit einem Browser1 zu integrieren..
Dieser Code funktioniert auch sehr gut.
Aber leider wird Die Webseite sehr klein in der Userform5 dargestellt. Ich muss jedes mal mit strg + Mausrad die Seite vergrößern.
Frage:
Wie kann ich per VBA das Str+ Maus scrollen erstellen oder die Webseiten Größe automatisch an den
Browser1 innerhalb der Userform5 anpassen?
Private Sub UserForm_Initialize()
StartUpPosition = 0
With Application
Left = .Left + .Width - Width
Top = .Top + .Height / 2 - Height / 2
Top = -1
Left = -1
End With
Call WebBrowser1.Navigate(Url:=" file:///D:/EMDB/HTML/index.html")
End Sub