VBA Daten Scraping von Webseiten

Question

document.getElementsByTagName („tr“). Länge Null zurück, wenn ich ein VBA-Skript ausführen

die Anzahl der tr-Elemente auf einer bestimmten Webseite zu finden

Sub AutomaticMode() 
Set IE = CreateObject("InternetExplorer.Application") 
IE.Visible = True 
IE.Navigate "https://www.example.com/" 
Do While IE.readyState < 4 
    Application.StatusBar = "DOM Loading ..." 
Loop 
Set username_field = IE.document.getElementByID("username") 
username_field.Value = "username" 
Set password_field = IE.document.getElementByID("password") 
password_field.Value = "password" 
SendKeys "{Tab}{Enter}" 
Do While IE.readyState < 4 
    Application.StatusBar = "DOM Loading ..." 
Loop 
Dim trList As IHTMLElementCollection 
Set trList = IE.document.getElementsByTagName("tr") 
MsgBox (trList.Length) 
End Sub 

Answer 1

Keine tr-Tags auf gefunden Ihre Website kann dadurch verursacht werden, dass das Makro vor dem vollständigen Laden der Seite ausgeführt wird. Versuchen Sie,:

Do While IE.readyState < 4 

zu:

Do While IE.readyState < 4 or IE.Busy 

Auch dies garantiert nicht, dass alles, was Lasten vor Makro Brennen, aber oft hilft und ist eine gute Praxis immer es umfassen. Manchmal müssen Sie ein Objekt finden, das im Frontend "Laden" usw. anzeigt und HTML-Elemente durchläuft, bis es verschwindet - dann können Sie Ihr Skript sicher ausführen.