求助抓取新浪行情

YZC51 · 发表于 2018-12-30 23:10

请参考！好用记得鲜花啦

VBA数据 .zip (299.47 KB, 下载次数: 36)

伍成平 · 发表于 2018-12-31 09:59

本帖最后由伍成平于 2018-12-31 10:01 编辑

YZC51 发表于 2018-12-30 23:10
请参考！好用记得鲜花啦

非常感谢老师！这个功能做完，看股的大部分基本功能都有了！！！这个表格是我东拼西凑综合起来的，找了不少高手帮忙

YZC51 · 发表于 2018-12-31 11:23

优化下

VBA数据 .zip (298.99 KB, 下载次数: 91)

YZC51 · 发表于 2018-12-31 11:24

伍成平发表于 2018-12-31 09:59
非常感谢老师！这个功能做完，看股的大部分基本功能都有了！！！这个表格是我东拼西凑综合起来的，找了不 ...

进一步优化下，请参考

伍成平 · 发表于 2018-12-31 16:37

本帖最后由伍成平于 2018-12-31 17:02 编辑

YZC51 发表于 2018-12-31 11:24
进一步优化下，请参考

这样改更好了，我也曾想优化那个代码的问题，没有成功。。要是会编程，直接修改炒股软件的外观，让别人看不出是炒股软件就好了，excel功能还是远不能和炒股软件比

五指山888 · 发表于 2019-1-13 14:40

YZC51 发表于 2018-12-30 23:10
请参考！好用记得鲜花啦

谢谢老师！

gpqyifan · 发表于 2019-10-20 14:09

五指山888 发表于 2016-9-19 14:39
谢谢老师，确实快很多，只是13列后面数据没有，至少有20列数据，行数我知道修改，列数老师可修改下吗？哪 ...

您好，怎么修改行数？现在只能显示120个股票数据

gpqyifan · 发表于 2019-10-20 14:14

liu-aguang 发表于 2016-9-19 11:29
这下就快了：
Sub 股票1()
Set oHttp = CreateObject("winHttp.winHttpRequest.5.1")

请问老师，如何修改行数？现在只能下载100行数据

lwx228 · 发表于 2019-11-5 11:41

YZC51 发表于 2018-12-31 11:23
优化下

受教了。
继续麻烦老师指导:新浪美股数据下载。

附件中有网址。

先谢谢了!

YZC51 · 发表于 2019-11-5 14:22

lwx228 发表于 2019-11-5 11:41
受教了。
继续麻烦老师指导:新浪美股数据下载。

将 'With CreateObject("Microsoft.XMLHTTP")
替换为 With CreateObject("winHttp.winHttpRequest.5.1")
即可取得数据，至于文本处理自己学着做一些，我暂时有事帮不了忙！

		自动登录	找回密码
密码			免费注册

[求助] 求助抓取新浪行情