Hallo,
ich versuche gerade per VBA auf einer Seite auf einen Link zu klicken, durch den dann per JavaScript ein Excel Export generiert wird.
Die betroffene Codezeile im Seitenquellcode sieht wiefolgt aus:
<span id="export-xls-icon" class="button" onclick="$tb.OpenListInExcel()" title="Export to Microsoft Excel"></span>
Allerdings bringt er bei der Codestelle Set IEDoc = IE.Document einen Laufzeitfehler. Könnt ihr mir helfen? Ich habe schon alles versucht, aber irgendiwe klappt es nicht. Die MsgBox bringt er schon bevor die Seite ganz geladen ist, kann der Fehler daran liegen? Oder gibt es hierfür eine bessere Alternative? Viele Grüße, Anka Anbei noch mein VBA Code: Sub Test()
'Open Website
Dim IE As Object
Dim IEDoc As Object
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate "Beispielsurl"
'wait until fully loaded
Do: Loop Until IE.Busy = False
MsgBox "Seite geladen?"
Set IEDoc = IE.Document ' Hier bringt er Laufzeitfehler 80004005: aufgerufenes objekt wurde von den clients getrennt
'Hier steht der Code, der für mich auf den <span> link (mit id=export-xls-icon) klickt
IEDoc.getelementbyid("export-xls-icon").Click
'Clean up
Application.ThisWorkbook.Activate
Set IE = Nothing
End Sub
|