软件: Excel
版本: 2016
最近在解决下载网页资料不顺利的问题
觉得是网页没有读取完整就去下载才造成的
所幸在youtube上找到一段可以解决这个问题的程式码
只是又延伸另外一个大问题
主要程式码如下,基本上是等待网页读取完整才跳出循环吧
Set IE = CreateObject("internetexplorer.application")
IE.Navigate URLb 'URLb 为变量 (连结网址)
Do While IE.readyState <> 4 Or IE.Busy
DoEvents
Loop
以上这段程式码
我是放在下载用的 For 循环里面的前半段
加了以后试了几次,下载变得非常顺利
只是后来电脑开始也变的怪怪的
进工作管理员一看,cpu或内存的使用率都有异常
结果是 IE 已经开了一大堆
然而因为加了这段程式码后的下载完成度效果非常显著,实在不舍著删
想问的是
如果要在同个循环后面,关闭同个循环前面自已开启的IE
请问要怎么写?