Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1556to1560
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

VBA kann Quellcode aus IE11 nicht auslesen

VBA kann Quellcode aus IE11 nicht auslesen
17.05.2017 13:14:52
Max
Hallo,
ich habe folgendes Problem:
Folgender Code funktioniert mit IE Es wird immer IE11 geöffnet und erhalte die Fehlermeldung "Die Methode 'Document' für das Objekt 'IWeb2' ist fehlgeschlagen"
ich habe bereits mit Zeitverzögerungen gearbeitet, bis die Webseite vollständig geladen wird. DoEvent, Loop, ReadyState aber nichts klappt.
Hat jemand noch eine Idee?
Besten Dank
Max

Private Sub URL_Load(ByVal sURL As String)
Application.ScreenUpdating = False
Dim appIE As Object
Dim sTxt As String
Set appIE = CreateObject("InternetExplorer.Application")
appIE.navigate sURL
Do: Loop Until appIE.Busy = False
Do: Loop Until appIE.Busy = False
sTxt = appIE.Document.DocumentElement.outerHTML 'Hier kommt die Fehlermeldung
Set appIE = Nothing
Close
Open ThisWorkbook.Path & "\temp.txt" For Output As #1
Print #1, sTxt
Close
Application.ScreenUpdating = True
'MsgBox "Der Text wurde gespeichert unter:" & vbLf & _
ThisWorkbook.Path & "\temp.txt"
End Sub
Sub Quellcodeladen()
Application.ScreenUpdating = False
If MsgBox("Sollen die TU-Daten geladen werden?", vbYesNo) = vbYes Then
Call URL_Load("Link")
End If
Application.ScreenUpdating = True
End Sub

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
VBA kann Quellcode aus IE11 nicht auslesen
17.05.2017 14:38:53
Anton
Hallo Max,
probier den IE so zu initialisieren:
Set appIE = GetObject("new:{D5E8041D-920F-45e9-B8FB-B1DEB82C6E5E}")
mfg Anton
AW: VBA kann Quellcode aus IE11 nicht auslesen
17.05.2017 15:18:50
Max
Hallo Anton,
das funktioniert soweit ganz gut. Danke dir vielmals :-)
Jetzt habe ich das Problem, dass der in eine Arbeitsblatt importierte Wert nicht so Dargestellt wird, wie es bei den älteren IE Versionen der Fall war. Gibt es da auch unterschiede?
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige