WebBrowser1.ExecWB stirbt, da OleInitialize fehlt
23.06.2004 15:25:39
Otto
Meine Testumgebung: Excel 9.0 SR-1, Multilingual unter Windows 2000 SP-4
in eine Userform habe ich ein WebBrowser-Objekt aus den Microsoft Internet Controls eingebunden, wie ich es in Hans' Beispielen Automatische Passworteingabe im Internet-Formular (2132/03) oder auch in Suche im Internet in Herbers Excel-Archiv (1837/02) gelernt habe. Das funktioniert auch wunderbar. Mein Programm klickt sich automatisch durch die fraglichen Internetseiten, bis es zu seinem Ziel kommt. Als nächstes möchte ich diese Seite komplett markieren lassen und in die Zwischenablage legen.
Das funktioniert mit Excel 8.0 (und dem IE 5.5 im Hintergrund) mit folgendem Codeschnipsel:
Versuche ich das Ganze mit Excel 9.0 (und IE 6.0) bleibt mein Programm an der ersten ExecWB-Zeile hängen und informiert mich mit dieser aussagekräftigen Fehlermeldung:
Laufzeitfehler '-2147221500 (80040004)': Die Methode ExceWB für das Obekt 'IWebBrowser2' ist fehlgeschlagen
Die Seite http://msdn.microsoft.com/library/default.asp?url=/workshop/browser/hosting/wbcustomization.asp machte mich dann darauf aufmerksam, dass die beiden Methoden OleInitialize und OleUninitialize erforderlich sind.
Doch wie ich zu denen komme habe ich nicht wirklich gefunden.
Zu Zeit benutze ich folgendes:
in einem Standardmodul:
und in meiner Userform:
Leider hilft das nicht, der Fehler tritt unverändert auf. Hat jemand einen Tipp für mich?
Gruß Otto