vba抓取网页数据(我已经想通了！我改变了一些事情的计算方式)

　　vba抓取网页数据(我已经想通了！我改变了一些事情的计算方式)

　　我已经想通了！我改变了一些计算方式，我最终编写的代码是：

　　Do Until n = SkillCount

With ieDoc.forms(0)

.ipStartDate.Value = Format(Date - Day(Date) + 1, "mm/dd/yyyy")

.ipEndDate.Value = Format(Now() - 1, "mm/dd/yyyy")

End With

Set drp = ieDoc.forms(0).skill

If Application.WorksheetFunction.CountIf(Range(Cells(3, y).Address, Cells(Cells(1, y).Value + 2, y).Address), drp.Children(n).Value) > 0 Then

drp.Children(n).Selected = True

Else

drp.Children(n).Selected = False

End If

n = n + 1

Loop

　　我能够找到一种方法来打印列下拉列表中的选项，然后进行一些查找以使用 LOB 引用代码，然后我在其右侧列出所有 LOB 并使用公式获取第一个/下一步 从下拉菜单中选择。我对原创帖子中的内容进行了更多调整，并省略了此代码段中定义的一些变量，但此代码段是发布帖子的原因，所以我决定抓住它。如果任何偶然发现这个线程的人在他们自己的代码中看到类似的东西，并希望我把整个东西放在这里看看 y 和 n 的定义位置，然后留下评论，我会编辑它。

　　希望这可以帮助其他正在处理收录下拉选择的网络爬虫的人