標題: [發問] 請問有中止運行中程式的好方法嗎? [打印本頁]

---

作者: fvawxweaz    時間: 2015-10-26 02:29     標題: 請問有中止運行中程式的好方法嗎?

大家好 我是剛學用Excel VBA的初學者，
請問如何在程式運行時，中止它?有什麼好方法嗎?
我寫了一支上網頁抓股票資料的程式，但執行完畢要花點時間，
想建一個可以中止抓資料的功能，但一執行程式，Excel就處於執行狀態無法點擊使用
所以想請問各位前輩，有什麼程式碼或方法可以達到這功能嗎?

---

作者: 自我感覺良好    時間: 2015-10-26 11:07

按Esc鍵，再按E即可。

---

作者: 准提部林    時間: 2015-10-26 14:36

本帖最後由 准提部林 於 2015-10-27 09:44 編輯

Sub test()
On Error GoTo END_001
Application.EnableCancelKey = xlErrorHandler
~~主程式~~
Exit Sub
END_001:
MSGBOX "已手動停止"
End Sub

---

作者: fvawxweaz    時間: 2015-10-27 03:13

感謝大大們的回復~
原來按"ESC鍵"就可以中止程式運行，不然都要傻傻等它跑完
感謝版主的程式碼，晚點來試試

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)