habe in einem Formular ein Webrowser eingebunden und rufe dort Internetseiten auf. Nun möchte ich dort den Text markieren (STRG+A) und in ein Tabellenblatt kopieren.
Alles bis auf das markieren funktioniert.
Diese Zeilen habe ich gefunden kann Sie aber leider nicht zum Leben erwecken.
Er meckert schon bei der Deklaration "appIE as InternetExplorer"
Declare Sub OleInitialize Lib "ole32.dll" (pvReserved As Any)
Declare Sub OleUninitialize Lib "ole32.dll" ()
...
Dim appIE As InternetExplorer
appIE.Navigate strGoogle
appIE.ExecWB OLECMDID_SELECTALL, OLECMDEXECOPT_DODEFAULT
appIE.ExecWB OLECMDID_COPY, OLECMDEXECOPT_DODEFAULT
wksNeu.Paste wksNeu.Range("A1")
...
Gruß Sven aus WOB