作者Ibrahimovic (伊布)
看板Office
標題[算表] 關閉開啟的IE
時間Wed Jan 31 17:47:29 2018
軟體: 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
請問要怎麼寫？
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 122.121.107.138
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Office/M.1517392051.A.274.html
1F：→ soyoso: set ie...不要放入for迴圈內的部分，不然執行一次就開啟一 01/31 18:40
2F：→ soyoso: 個ie的窗體。關閉以quit 01/31 18:41
感謝
最後set ie我放進入迴圈前，ie.quit放跑完迴圈後
※ 編輯: Ibrahimovic (122.121.107.138), 01/31/2018 20:45:14
3F：→ ProTrader: set ie放在副程式 另外呼叫 "call 下載資料()" 02/01 12:15
4F：→ ProTrader: 副程式最後要set ie = nothing 副程式放在迴圈呼叫 02/01 12:17