Per VBA "Id" aus geöffneter IE-Instanz (Adresse nicht fest) auslesen
26.10.2019 07:53:04
Andrea
Folgendes also:
Ich möchte aus der letzten aktiven geöffneten IE Seite den Quellcode auslesen, bzw. dort bestimmte IDs ansteuern und deren Namen oder Inhalt in Excel in (z.B.) Zelle A1 wiedergeben. Die Adresse der IE-Seite ist variable. Ich kann die also nicht vorher gezielt ansteuern. Sie muss also geöffnet werden.
Unten angefügten Code hab ich gefunden. Der verursacht aber eine Fehlermeldung: "Objektvariable oder With-Blockvariable nicht festgelegt" bei: MsgBox ie.Document.body.innertext.
Was mache ich falsch. Danke für die Hilfe und viele Grüße
Andrea
Sub a()
Dim ie As Object
Dim objShell As Object
Dim objWindow As Object
Dim objItem As Object
Set objShell = CreateObject("Shell.Application")
Set objWindow = objShell.Windows()
For Each objItem In objWindow
If LCase(objItem.FullName Like "*iexplore*") Then
Set ie = objItem
End If
Next objItem
MsgBox ie.Document.body.innertext
End Sub