使用xmlHttp，如何将getelementsbytagname（“A”）直接设置为无html文档的对象

使用下面的方法，即将所有myLink以它在网页中的方式放入我的excel单元格中 –

result = ie.document.body.innerHTML Set html = CreateObject("htmlfile") html.body.innerHTML = result Set myLinks = html.getElementsByTagName("A") For Each myLink In myLinks Sheet1.Cells(i, "A").Value = myLink 

因此，我必须编写一些有条件的replace语句来将一些myLink中的一些左侧字符replace为http://www.
但是，当我使用下面的方法，即带来每个myLink到我的Excel单元格与http://www. 。 我不必处理任何Replace语句 –

 Set myLinks = ie.document.getElementsByTagName("A") For Each myLink In myLinks Sheet1.Cells(i, "A").Value = myLink 

现在xmlHttp快了很多，我想用它，但它也带来了myLink在这个方法的网页 –

 Set html = CreateObject("htmlfile") html.body.innerHTML = xmlHttp.ResponseText Set myLinks = html.getElementsByTagName("A") For Each myLink In myLinks Sheet1.Cells(i, "A").Value = myLink 

我尝试了以下，但它不起作用 –

 Set myLinks = xmlHttp.ResponseText.getElementsByTagName("A") For Each myLink In myLinks Sheet1.Cells(i, "A").Value = myLink 

仍然环顾四周，但还没有发现任何东西，绕过HTML对象设置myLinks。 因此，我的问题精英成员 – 有没有办法绕过的HTML对象或是一个必须的xmlHttp对象？ 感谢任何帮助或答复。