如何用VBA從公開資訊觀測站抓每日股價 - 財經

Table of Contents

※ 引述《faceoflove56 (浪漫台三線)》之銘言:
: 最近剛碰VBA,目前資料都是從鉅亨網及Histock等網站來的
: 但其實我還是比較想從公開資訊觀測站抓(MOPS),因為比較可靠資訊也較多
: 以下是資料來源
: http://www.tse.com.tw/zh/page/trading/exchange/STOCK_DAY.html
: 目前有一個問題是MOPS必須輸入Ticker再按查詢
: 如果是鉅亨網網址後面就會有我要查詢的股票代號
: (VBA就可以根據此網址直接找到該股資訊,如下3017)
: http://www.cnyes.com/twstock/profile/3017.htm
: 想請教各位都是如何用VBA從MOPS抓這類型的網頁資料?
: 另外想請問有在抓網頁資料的前輩都是如何抓的?
: 因為用VBA當有新公司就要改一堆語法,覺得不如直接複製貼上來得快
: Thx


我看了一下你提供的網址

研究了一下發現 csv檔可以直接下載

http://www.tse.com.tw/exchangeReport/STOCK_DAY?response=csv&date=20170601&stockNo=2330

提供給大家參考~



原則上只要改股票代號 及 看要抓哪一個月就改當月的第一天

舉例來說要抓 4月 2330的資料

日期改 20170401 (測試一下4/1假日一樣寫 01 沒關係)

就可以自訂要下載的月份及股票代號



我順手寫了一個ExcelVBA

有需要的人可以參考看看~

https://goo.gl/aJW587

使用上有什麼問題歡迎推文討論

--

All Comments

Ula avatarUla2017-07-02
感謝分享
Iris avatarIris2017-07-02
thanks
Emily avatarEmily2017-07-03
感謝熱情分享~~~
Charlie avatarCharlie2017-07-03
感謝分享
Isla avatarIsla2017-07-04
感謝分享~~
Liam avatarLiam2017-07-04
感謝分享~
Mason avatarMason2017-07-05
樓主一生平安喜樂
Sarah avatarSarah2017-07-05
感謝大大分享,請問一下上櫃的要怎麼抓呢?
Hedwig avatarHedwig2017-07-06
http://www.tpex.org.tw/web/stock/aftertrading/daily_
trading_info/st43_download.php?l=zh-tw&d=106/07&stkn
o=6180
Harry avatarHarry2017-07-06
yu大大請問一下要怎麼改呢?
Lucy avatarLucy2017-07-07
106/07是月份,6180是股票代號,自行替換即可
Lauren avatarLauren2017-07-07
謝謝樓主~
Xanthe avatarXanthe2017-07-08
這幾天沒來逛板,感謝Yushi的分享~
Ivy avatarIvy2017-07-08
請教一下YU大大是把你打的網址分段輸入進去嗎?
Margaret avatarMargaret2017-07-09
可是這邊好像有個問題是檔案名稱不允許有/\出現
要怎麼改呢?
Hazel avatarHazel2017-07-09
/ \ 應該是可以出現的,分段輸入 ="網址1"&B3&"網址2"
Xanthe avatarXanthe2017-07-10
上面是包含儲存格和文字的例子
Ethan avatarEthan2017-07-10
我改了一下檔案作了一個上櫃股價的下載版本
Iris avatarIris2017-07-11
https://goo.gl/WBiLNE 請參考
pppeeeyyy說的應該是存檔名稱 改了函數提供參考
Yedda avatarYedda2017-07-11
先謝謝大大了