[分享]股票行情自动更新

itxianfeng · 发表于 2009-5-25 12:36

这个软件可以不断刷新，挺好，有没有带蜡烛图的，希望有提供的，谢谢

ak47ok · 发表于 2009-6-3 19:28

真是高手、但这高手好象没有再发帖了？

itxianfeng · 发表于 2009-6-6 21:31

好久没有来EXCELHOME来了，因为现在重点是在研究股票的预测。我很喜欢这楼主个小程序，也一直在运用它研究股市行情，真是实用，可以对我及时所关注的股票一览无余。
我还有一个小小需求，就是只要在B列输入股票名称，在A列就会自动的显示这个股票的代码（同一行）。希望能者多劳，增加这一功能。

xmmarykay · 发表于 2009-7-31 10:01

太厉害了，越来越喜欢这个论坛了，高手如云，继续学习

rufo · 发表于 2009-8-3 23:40

这个代码有两个缺点，第一，数据不断更新，不能实现刷新一次更新一次；第二，当数据量多了（60条以上），就非常慢了，当刷新后，你根本不能做任何东西，如果能解决这两问题，就很完美了。

klkl · 发表于 2009-8-6 16:46

请问楼主:换手率如何加上?

gyzzf · 发表于 2009-8-3 23:44

不错，有时间再研究

泓() · 发表于 2009-8-7 16:23

正好观摩一下楼主的代码

itxianfeng · 发表于 2009-8-13 21:51

楼主的代码我用了大概两个月了，感觉是EXCEL里面最好的，最实用的，因为它可以根据用户的需要来搜索数据。
但是这个代码有个毛病只能运行150个代码，多了就会罢工，不过我把它修改过来，一次可以运行上千多条股票，去掉一些不用的显示数据（这样会缩短很多时间）速度也会很快，大概用2.5分钟，1300个代码数据全部显示出来
这个程序如果用和讯网址的数据就好了，那里数据全面，有量比，换手率振幅等重要的数据，（楼主的程序只能提供最新价、涨幅、涨跌额这几个重要数据，太少了）而且浏览速度也快，
楼主要是看到此贴能否改动一下网页-新浪网改成和讯网，可惜我对网页浏览的代码一窍不通。研究了2个月，还是不知道从何下手

[ 本帖最后由 itxianfeng 于 2009-8-13 21:57 编辑 ]

itxianfeng · 发表于 2009-9-5 21:33

hnlcn朋友
我恢复了一些数据，因为我还有别的事情要做，所以没有将标题栏对其位置，你自己对号入座就行，
这个表还有很大的扩展性，你可以显示很多指标，不过我感觉不重要，所以没有让他们显示出来，楼主如果需要可以改动下面的类似代码就能显示出你需要的数据（前提是网页已经提供的数据），并且显示到你满意的位置（即第几列）
举个例子来说（只需改动与此同类的代码，很好找）
Sheets(1).Cells(idx + x, 7) = tmp(4)
Sheets(1).Cells(idx + x, 7) 是指SHEET(1)表的第 idx + x行第7列的这个位置的单元格
idx + x你不用管他，是专门控制行的。
关键是代码中的这个7，就是指第7列，改动了它，你就会使其放到你所需要的列（根据你自己设置标题的位置来）
代码中的这个4，就是调用某个指标在新浪网页数据中的单元位置，具体有多少指标，我也没有深究，我去新浪网页里面只看了1次，发现数据不全，所以只调用了我需要的几个指标，你可以分别尝试一下调用1-17 ，看看分别调用的是什么数据，这个我也是没时间调试，你自己试试吧。

[ 本帖最后由 itxianfeng 于 2009-9-5 21:39 编辑 ]

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