0
While Not code_Download = 0 'code_Download = 0 --> CORRECT
If delay < 30000 Then
delay = delay + 2000
Else
MsgBox "Delay too long"
CREATEtemp_fileXML = False
Exit Function
End If
Set IE = New InternetExplorerMedium ' <<<<<<<<<
IE.Navigate wURL
Sleep delay
IE.Quit
code_Download = URLDownloadToFile(0, wURL, temp_fileXML, 0, 0)
所以我设置了一个新的InternetExplorermedium每当我通过循环。没有这个,我得到了一个不被认可的界面的错误。我想知道如果我可以和如何摧毁以前的指针,或者如果这是“不是那么糟糕”的做法。 谢谢VBA是我的对象删除,如果我把它设置为一个新的