Ich möchte per Webabfrage die durch VBA ausgelöst wird ein Suchergebnis von einer Internetseite nach Excel importieren.
Das Problem liegt in der Übertragung des Suchbegriffs.
Für die Google-Seite habe den entsprechenden Code hier schon gefunden.
Sub IAPD()
Set appIE = CreateObject("InternetExplorer.application")
appIE.Visible = True
appIE.Navigate "https://www.google.de"
While Not appIE.ReadyState = 4 'Warte auf Webseite
DoEvents
Wend
appIE.Document.all.q.Value = "Deutsche Bank"
appIE.Document.Forms(0).submit
End Sub
Ich brauche das ganze jetzt für folg. Seite:
http://www.adviserinfo.sec.gov/IAPD/Content/Search/iapd_OrgSearch.aspx
Wenn ich den VBA Code entsprechend anpasse kommt leider eine Fehlermeldung "Laufzeitfehler 438"an folgender Stelle:
appIE.Document.all.Name.Value = "Deutsche Bank"
Aber auch dieser Befehl scheint nicht zu funktionieren:
appIE.Document.Forms(0).submit
Kann mir hier jemand weiterhelfen?
Vielen Dank!