作者noworneverev (小朋友)
看板Finance
标题[闲聊] 分享用VBA写的台银汇率爬虫
时间Sun Dec 10 20:22:16 2017
台湾银行汇率爬虫程式下载:
1.
即时牌价查询增益集(xlam):
https://goo.gl/kLQRyL
2.
单一币别汇率查询(xlam):
https://goo.gl/5vTCF5
单一币别查询Demo(xlsm):
https://goo.gl/as7oJn
3.
全部币别汇率查询(xlam):
https://goo.gl/Bh1XZj
全部币别查询Demo(xlsm):
https://goo.gl/HKtJyk
4.
全部币别汇率查询_对话方块显示增益集(xlam):
https://goo.gl/wdpqYu
全部币别汇率查询_对话方块Demo(xlsm):
https://goo.gl/L4wf1R
5.
每月汇率表产生器(xlsm)(有密码):
https://goo.gl/LXSQ8o
台银汇率爬虫Demo影片:
https://youtu.be/efMJ1QwSmVc
增益集使用方法:
https://youtu.be/_8ez9G_QCUU
网页爬虫虽然现在首推Python,但用Excel VBA来写可能较亲民一点,上列几支程式大部
分会将指定的资料直接抓到Excel中 ,VBA也有分几种爬虫方式,我主要是爬取网页的元
素,虽然是相对原始的方法,不过速度还算快,另请自行衡量是否要加载这些增益集
至Excel中,单一币别汇率查询为了功能的完整写了1000多行。虽然看Demo影片应该可以
很清楚理解这几个增益集的作用,下面稍做介绍:
1. 即时牌价汇率查询:此功能会抓取此台银汇率页面
(
http://rate.bot.com.tw/xrt?Lang=zh-TW)的资料,并将资料载入Excel中。
2. 单一币别汇率查询:此功能抓取台银单一币别的历史汇率
(
http://rate.bot.com.tw/xrt/history/)左边的地方,并画出走势图,虽然该网页只能
选取最近两年度,不过其实更早以前的资料也是找得到的,在增益集跳出的那个表单更改
年度即可。
3. 全部币别汇率查询:此功能爬取上面网址右边的部分,若输入的日期没有资料会跳出
对话方块提醒。
4. 全部币别汇率_对话方块:上面三个功能都会新增工作表来放查询的资料,而这个功能
仅会跳出对话方块显示查询到的汇率资料。
5. 每月汇率表:这个汇率表是写最久的,因为还有用别种爬虫语法爬中国的汇率,可产
出任一月份所有币别每一天的汇率表,我是以平常上班每月收到的汇率表为原形来写,所
以有锁密码,如果你是某个要搬家的事务所的同事欢迎寄信跟我拿密码。
每一推100P~
--
An Excel Add-in for audiors and accountants
http://tickmark.tw/
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 112.104.25.126
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Finance/M.1512908546.A.50B.html
推 kisha024: 热心给推 12/10 22:07
推 jumbotest: PUSH 12/10 22:41
推 cyf0531: 推 12/11 00:40
推 forgreen: 推 12/11 11:00
推 only0307: 推热心 12/11 14:44
推 seysem: 好厉害 12/11 16:35
推 lay911225: 推 12/11 17:03
推 iamlukeli: 推 12/11 21:13
※ 编辑: noworneverev (112.104.94.156), 12/11/2017 21:58:41
推 bighaed: 推 12/11 22:16
推 summerla: 热心推!! 12/11 22:37
推 hinagiku0531: 推 12/11 22:56
推 dannykk: 推 12/11 23:21
推 jasonpower: 推 12/11 23:28
推 k123yoo: 推 12/11 23:51
推 wiwi8031588: 推 12/11 23:52
推 oneshoe: 推! 12/12 00:54
推 eric117023: 推 12/12 00:59
推 Jyunyang: 推 12/12 02:04
推 hu321: 推 12/12 02:16
推 scanf: 用心推 12/12 03:45
推 xfrank04: 推 12/12 12:20
推 redonejay: 推! 12/12 12:20
推 callmehunt55: 推~ 12/12 12:48
推 jesusQQ: 推推 12/12 13:21
推 LIZ402: 推推! 12/12 16:40
推 amberkuofrui: 推 12/12 16:42
@ 以上红底标记26位,每人100P(税前)发送完成! by AutoGiveP 2.08
※ 编辑: noworneverev (112.104.93.10), 12/12/2017 19:40:59
推 hoho827: 退 12/12 19:50
推 owensampo: 公司财务泪推! 12/12 20:00
推 poeplew: 推 12/12 21:42
推 novetin: 推 12/12 22:55
推 homewhs: 推 12/12 23:22
推 CMD: 推 12/12 23:23
推 b9039011: 热心推~ 12/12 23:26
推 angel50732: 推 12/13 02:47
推 tracyb860627: 热心推~ 12/13 07:14
推 maimss: 推 12/13 08:47
推 mcdonnell: 推 12/13 09:53
推 daydreamer7: 推 12/13 10:54
推 eddie810107: 推 12/13 10:55
推 DDDCCCc: 热心推 12/13 11:58
推 blueivy: 推! 12/13 14:37
推 seohyunfans: 太神啦 12/13 16:34
@ 以上红底标记16位,每人100P(税前)发送完成! by AutoGiveP 2.08
※ 编辑: noworneverev (112.104.109.169), 12/13/2017 19:28:27
推 yolly1022: 哇,感觉很好用!谢谢分享~ 12/13 21:01
推 y3xu6ye08: 又强又热心!!推~ 12/14 03:01
推 fiegger: 推 12/14 12:40
推 Roderick: 推 12/14 14:48
@ 以上红底标记4位,每人100P(税前)发送完成! by AutoGiveP 2.08
※ 编辑: noworneverev (112.104.92.145), 12/14/2017 19:41:33
推 lk2986706we: 推 厉害 12/14 21:43
推 pulator259: 推推 12/15 11:56
推 jotxup: 推~ 12/15 19:46
推 sallybird: 推 12/15 23:10
@ 以上红底标记4位,每人100P(税前)发送完成! by AutoGiveP 2.08
※ 编辑: noworneverev (112.104.94.231), 12/15/2017 23:34:03
推 brianliu0104: 推推 12/16 00:51
推 a5170040: 还不错 12/16 00:59
推 winhong61: 推推! 12/16 10:22
推 ray27513: 推 12/16 15:48
推 ch1213518: 推推!! 12/16 16:16
@ 以上红底标记5位,每人100P(税前)发送完成! by AutoGiveP 2.08
※ 编辑: noworneverev (112.104.93.34), 12/16/2017 20:40:30
推 love113w: 推 12/16 22:10
推 ykap0969: 推 12/17 10:11
推 utetsu: 推 12/18 09:47
推 mury1414: 推 12/18 15:13
推 rubyjay: 推 12/19 09:35
推 garhorng: 热心推 12/19 19:01
推 Roderick: 推 12/19 23:46
推 zodiak: 推 12/22 13:23
推 lip99: 推 太强 12/25 23:22
推 Dennishao: 推 12/26 15:51
推 clse4139: 推 12/28 07:23
@ 以上红底标记11位,每人100P(税前)发送完成! by AutoGiveP 2.08
※ 编辑: noworneverev (112.104.24.197), 01/04/2018 20:57:22