使用Excel VBA在单个页面上刮取多个标记

我正在尝试使用Excel VBA自动化一个网站，以便从单个页面上的多个选项卡获取数据。但是它只是给出了第一个标签上的信息，我没有从第二个标签上得到任何东西

我正在使用以下代码：

Sub-BrowseToSite（）
Dim IE作为新的SHDocVw.InternetExplorer
将HTMLdoc设置为新的MSHTML.HTMLDocument
Dim HTMLInput，链接为MSHTML.IHTMLElement
Dim HTMLButtons、链接、FButtons，导出为MSHTML.IHTMLElementCollection
将HTMLButton设置为MSHTML.IHTMLElement
可见=真实
即，导航“URL”
在IE.ReadyState ReadyState\u完成时执行此操作
环
设置HTMLdoc=IE.Document
设置HTMLButtons=HTMLdoc.getElementsByTagName（“a”）
对于HTMLButtons中的每个HTMLButton
Debug.Print HTMLButton.tagName，HTMLButton.innerText
下一个
端接头

每当我点击

事件队列

，它每次都会打开一个新选项卡，我想点击第二个选项卡上的

公司

链接。我没有太多的细节，因为有一个安全的网站，所以即使共享URL也不会工作。我只想从下一个选项卡填充元素。大多数都是链接

以下是该网页的图像：

---

事件队列之前的网页HTML内容单击，之后单击。

请共享更多详细信息。整个网页的网页URL或HTML内容是什么？您需要检索哪些数据，以及预期的输出是什么？可能是当您单击页面上的选项卡时，事件添加了内部html，或者页面可能会被重新加载（如果它是php）。请尝试单击该选项卡，然后读取其内容。@omegastripes，@ClintB:Please Help似乎您共享的HTML文件不包含位于页面左侧的

事件队列

节点。该页面是否由多个框架组成？请在单击

事件队列

后立即检查浏览器开发人员工具中“网络”选项卡上记录的XHR。请共享更多详细信息。整个网页的网页URL或HTML内容是什么？您需要检索哪些数据，以及预期的输出是什么？可能是当您单击页面上的选项卡时，事件添加了内部html，或者页面可能会被重新加载（如果它是php）。请尝试单击该选项卡，然后读取其内容。@omegastripes，@ClintB:Please Help似乎您共享的HTML文件不包含位于页面左侧的

事件队列

节点。页面是否由多个框架组成？请在单击

事件队列

后，立即检查浏览器开发人员工具中“网络”选项卡上记录的XHR。