如何从网上获取某支股票最新价格？？？

HHAAMM · 发表于 2014-10-17 14:45

jubaopen18 发表于 2014-10-17 11:00
版主大神，确实好用。非常感谢。你这个也是利用宏的吧？能否再讲直白一点。或者一步步教我一下。我要灵活 ...

是用的宏
不知你有没有其他计算机语言的知识？
这几行代码要是看不懂的话，就是加上注释，估计你还是做不到灵活运用。
如果只是某一两句不明白还有解释的必要。

jubaopen18 · 发表于 2014-10-17 14:56

HHAAMM 发表于 2014-10-17 14:45
是用的宏
不知你有没有其他计算机语言的知识？
这几行代码要是看不懂的话，就是加上注释，估计你还是做 ...

呵呵。10多年前有考了计算机3级，那时学了一点C语言。之后就没用过。现在早忘完了。不好意思，让你见笑了。

HHAAMM · 发表于 2014-10-17 15:36

我现在手机操作，就几句吧！
外层是个循环，1到A1单元格相连区域行数的个数
with语句是创建一个XMLHTTP对象，该对象专门用于使用GET或POST方式和远程数据库交换信息。
该对象的OPEN方法需要三个参数，方式，地址，是否同步。下面的那个方法是执行的意思。
获取的文本是由-符号连接起来的，用那个SP开头的函数将文本拆分到数组，数组的第三个元素内存放的是价格，第三十个是时间，这个时间是连在一起的，所以要格式化一下，然后是数据写入单元格中。

jubaopen18 · 发表于 2014-10-17 15:53

本帖最后由 jubaopen18 于 2014-10-17 15:54 编辑

HHAAMM 发表于 2014-10-17 15:36
我现在手机操作，就几句吧！
外层是个循环，1到A1单元格相连区域行数的个数
with语句是创建一个XMLHTTP对 ...

再次感谢，手机上网都能帮我回复。真是太有奉献精神了。可能是我基础太弱吧，还是不会弄。excel目前我只会简单的公式。版主大神能否加一下我QQ（我的QQ是349088270），远程帮我处理一下表格？可能我的要求有点过了。真是不好意思。可是最近几天这事一直在困扰着我。希望你能理解。

jubaopen18 · 发表于 2014-10-18 17:47

HHAAMM 发表于 2014-10-17 10:40
哦还要区分深圳上海的股票代码，换下面这样

老大，我生搬硬套算是搞定我的表。现在追问一下如何加上自动定时刷新呢？加上什么代码？请帮我一下。谢谢

HHAAMM · 发表于 2014-10-18 21:35

本帖最后由 HHAAMM 于 2014-10-18 21:41 编辑

jubaopen18 发表于 2014-10-18 17:47
老大，我生搬硬套算是搞定我的表。现在追问一下如何加上自动定时刷新呢？加上什么代码？请帮我一下。谢谢

文件中是6秒刷新一次（刷新间隔太小没意义）
由于VBA自身没有定时器，只好借用。不过这次生搬硬套起来麻烦些

如何自动获取股票最新价格-.rar (16.22 KB, 下载次数: 1649)

jubaopen18 · 发表于 2014-10-20 17:34

HHAAMM 发表于 2014-10-18 21:35
文件中是6秒刷新一次（刷新间隔太小没意义）
由于VBA自身没有定时器，只好借用。不过这次生搬硬套起来麻 ...

佩服佩服，太强了。这回是没法搬了，只能努力学习了。谢谢老大。

wenqx · 发表于 2015-1-9 18:35

本帖最后由 wenqx 于 2015-1-10 21:35 编辑

HHAAMM 发表于 2014-10-18 21:35
文件中是6秒刷新一次（刷新间隔太小没意义）
由于VBA自身没有定时器，只好借用。不过这次生搬硬套起来麻 ...

老大，利用这个宏无法正确获取上海证券所的可转债，能否改良一下？例如证券代码 110023 民生转债。万分感谢！

chengxiang · 发表于 2015-6-9 15:42

本帖最后由 chengxiang 于 2015-6-9 18:20 编辑

HHAAMM 发表于 2014-10-18 21:35
文件中是6秒刷新一次（刷新间隔太小没意义）
由于VBA自身没有定时器，只好借用。不过这次生搬硬套起来麻 ...

佩服得五体投地呀版主，太强大了。如果能在B列自动写入股票名称就更方便了。请版主抽时间看下能否加几行代码实现。

hzchenp · 发表于 2015-6-9 16:17

HHAAMM 发表于 2014-10-18 21:35
文件中是6秒刷新一次（刷新间隔太小没意义）
由于VBA自身没有定时器，只好借用。不过这次生搬硬套起来麻 ...

伟大的版主让我们见识了万能的EXCEL,向你致敬!

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

[求助] 如何从网上获取某支股票最新价格？？？

评分

评分