Re: [文件] Excel VBA更新股价无法使用

楼主: abc9gad (乡民爱发呆)   2019-01-11 14:53:46
※ 引述《abc9gad (乡民爱发呆)》之铭言:
: 软件:Excel
: 版本:2010
: 小弟我原本有上网抓一个VBA可以更新股价的档案
: 然后有小改一些地方
: 但昨日突然无法更新,平常只要按左上的手动全/各(按钮)
: 就可以自动更新股价,从Excel VBA显示的错误来看
: 也不像是连结的问题 还请版上高手看看 感谢
: 档案连结
: https://drive.google.com/open?id=1WkbYLhqaPCVa2jf3-qba0OJhShgyU7TQ
今天盘后要更新股价时,又如同上次出现错误,
这次不管是改成idv与div都无法正常更新,错误显示的地方更上次一样
好像不是问题所在,还望请版上高手协助 谢谢
档案连结
https://drive.google.com/open?id=1WkbYLhqaPCVa2jf3-qba0OJhShgyU7TQ
作者: soyoso (我是耀宗)   2019-01-11 15:19:00
同上次地方出现的话,ST1的字串改为"资料日期:"ST2改"</font></td>"下面uRng(..)= left(gettime,9)
楼主: abc9gad (乡民爱发呆)   2019-01-11 15:58:00
成功了谢谢s大,请问这一样是原始网页的编码变更关系吗
作者: soyoso (我是耀宗)   2019-01-11 16:01:00
一样是变更的关系
楼主: abc9gad (乡民爱发呆)   2019-01-11 16:08:00
请问s大看的出来是因为哪个部分变更的关系,造成无法跑是日期或是时间等等的原因吗,想看有没有一劳永逸的方法其实我只需要档案可以让我即时更新股价就够了~
作者: soyoso (我是耀宗)   2019-01-11 16:27:00
昨今日的写法不同 https://i.imgur.com/pPwgUvm.jpg原本变量ST1的<..=""ssbodyw"">和ST2的"</span>..."今天就不存在了,也就无法抓取原本希望要取得的字串因这二次皆出现错误在这方面,且日期时间也不是所需的话就从ST1...往下四行到uRng(...)=...这部分看要删除或标注起来,这方面影响的是n栏time的部分
楼主: abc9gad (乡民爱发呆)   2019-01-11 16:37:00
先谢过s大
作者: soyoso (我是耀宗)   2019-01-11 16:51:00
但表格内股票代号的右侧是时间,如果想改以这个时间写到n
楼主: abc9gad (乡民爱发呆)   2019-01-11 16:51:00
谢谢s大,我先把这段注解起来好了~看未来还会不会再发生
楼主: abc9gad (乡民爱发呆)   2019-01-11 16:58:00
太感谢S大!,我将GetTime注解起来,uRng改为您说的时间就能正常显示了
作者: soyoso (我是耀宗)   2019-01-11 17:38:00
抱歉更正我的回文,"标注"起来应为a大所回文的"注解"才对

Links booklink

Contact Us: admin [ a t ] ucptt.com