Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/24.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
VBA正在消耗内存。。无法清除资源_Vba_Excel_Xmlhttprequest - Fatal编程技术网

VBA正在消耗内存。。无法清除资源

VBA正在消耗内存。。无法清除资源,vba,excel,xmlhttprequest,Vba,Excel,Xmlhttprequest,我正在使用xmlHTTP编写一个VBA代码,我遇到了一个问题,我无法找出它的原因 问题是: 当循环运行时,它不断消耗越来越多的内存,因此我试图找到导致此问题的部分,我提出了以下部分: For i = 1 To 100 url = "https://www.google.co.in/search?q=" & "hello" & "&rnd=" & WorksheetFunction.RandBetween(1, 10000) Set XMLHTTP

我正在使用xmlHTTP编写一个VBA代码,我遇到了一个问题,我无法找出它的原因

问题是:

当循环运行时,它不断消耗越来越多的内存,因此我试图找到导致此问题的部分,我提出了以下部分:

For i = 1 To 100
    url = "https://www.google.co.in/search?q=" & "hello" & "&rnd=" & WorksheetFunction.RandBetween(1, 10000)
    Set XMLHTTP = CreateObject("MSXML2.serverXMLHTTP")
    XMLHTTP.Open "GET", url, False
    XMLHTTP.setRequestHeader "Content-Type", "text/xml"
    XMLHTTP.setRequestHeader "User-Agent", "Mozilla/5.0 (Windows NT 6.1; rv:25.0) Gecko/20100101 Firefox/25.0"
    XMLHTTP.send
    Set html = CreateObject("htmlfile")
    html.body.innerHTML = XMLHTTP.responsetext
    DoEvents
Next i
我尝试了我能想到的一切(尝试将对象设置为nothing(在循环内部和外部),并尝试从“for循环”内部保存excel文件),但我无法解决问题。 我尝试了以下3行,但它们没有解决任何问题:

    XMLHTTP.abort
    Set XMLHTTP = Nothing
    Set html = Nothing
注意#1:即使这11行代码是唯一要执行的代码,问题也会出现

注意#2:即使在过程完成后,内存也不会被释放

附加程序运行时内存使用情况的屏幕截图:


请告知。。谢谢

本周早些时候,Benoit提到的上述问题的解决方案开始向Office 2016客户推出。如果您还没有更新,请转到文件帐户更新选项立即更新

办公室团队的安妮丝