如何用VBA点击web IE应用程序中的列表项

Question

基本上我的要求是通过 vba 从网页下载 excel 文件。我已经编写了登录代码，但无法单击列表项。我需要遍历类的循环，然后列出并标记 a。因此，请帮助我如何使用vba迭代多个选项。

我已经附上了HTML源代码，我需要从Ul标签下的第一个列表中访问每小时报告。

Sub DownloadIntraDayReport()`

Dim ie As New InternetExplorer 

ie.navigate "weblink" 

ie.Visible = True 

While ie.Busy DoEvents Wend 

Do Loop Until ie.readyState = READYSTATE_COMPLETE 

Set HTMLDoc = ie.document 

ie.document.getElementById("_58_login").Value = "username" 

ie.document.getElementById("_58_password").Value = "password" 

'ie.document.form().submit 

For Each MyHTML_Element In HTMLDoc.getElementsByTagName("input") If MyHTML_Element.Type = "submit" Then MyHTML_Element.Click 

Next 

End Sub

源代码

页面图像和HTML

Answer 1

您是否尝试过以下方法：

IE.document.getElementById("scheduledReportList").Click

其中IE是用于抓取页面的Internet Explorer的实例。