如何使用VBA

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

Source Code

页面和HTML的图像

Answer 1

你有没有试过像：

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

IE是用于刮擦页面的Internet Explorer实例。