在线文档能否调用实时股价？

收藏关注

我研究了一下，本人才疏学浅还没有找到WPS调用股价的方法

腾讯在线文档倒是能够调用，比如输入“=STOCK("123109.SZ",0)”，可以调用昌红转债的价格，但是是上个交易日的收盘价，并不是实时的

请教各位大神：有能调用实时数据的函数吗？

PS：输入内容不带引号！

发表时间 2021-11-30 16:09

赞同来自: xgjxgq 、y21557900 、leonyuan

14 个回复

枫林随手记

腾讯文档的STOCK函数挺方便的。最近都在用腾讯文档。

2022-01-19 17:50 引用

一片小树林

自动数据刷新好像比较慢，有手动刷新的方法吗

2021-12-01 23:20 引用

konged

VBA不是很熟。

请问

第一句为啥是=getStockPrice("sh113628"，运行不了啊。

不应该是=getFundData("sh113628")吗？但运行提示GETHTTP子过程或函数未定义

@漫步可转债

2021-12-01 19:32 引用

泰国大叔 - 感谢：江特电机/新城发展

感谢，是可以用的，我是在里面输代码，显示预览不出来，实际直接回车是能显示出来的

2021-12-01 18:33 引用

大道之行也 - 大道至简，大道止简；简单投资，静待花开！

赞同来自: wangliang99

@泰国大叔
我试了能调用，你可以在腾讯文档里输入“=STOCK("111000.SH",8)”试试（无引号）

2021-12-01 16:01 引用

自动化交易机器

很早就有了，转债，LOF基金折溢价等。
集友喜欢重复造轮子。

2021-12-01 14:52 引用

泰国大叔 - 感谢：江特电机/新城发展

这个好像不能调用转债价格啊，有没有合适方法搞定转债啊

2021-12-01 14:36 引用

大道之行也 - 大道至简，大道止简；简单投资，静待花开！

@leoinusa
这个我也不知道，其他的内容还在一点点的摸索中

2021-12-01 12:44 引用

leoinusa

请问能计算六十日线什么的么

2021-12-01 11:50 引用

wangliang99

不错的方法和思路

2021-12-01 08:44 引用

大道之行也 - 大道至简，大道止简；简单投资，静待花开！

@漫步可转债
谢谢！

2021-12-01 06:23 引用

漫步可转债

赞同来自: 口口夕口木、pqfund 、ikalang 、ryanxzqn 、chenlei200332 、Wanli012 、hannon 更多 »

=getStockPrice("sh113628")

'http://eryk.javaeye.com/blog/638277
'0：”大秦铁路”，股票名字；
'1：”27.55″，今日开盘价；
'2：”27.25″，昨日收盘价；
'3：”26.91″，当前价格；
'4：”27.55″，今日最高价；
'5：”26.20″，今日最低价；
'6：”26.91″，竞买价，即“买一”报价；
'7：”26.92″，竞卖价，即“卖一”报价；
'8：”22114263″，成交的股票数，由于股票交易以一百股为基本单位，所以在使用时，通常把该值除以一百；
'9：”589824680″，成交金额，单位为“元”，为了一目了然，通常以“万元”为成交金额的单位，所以通常把该值除以一万；
'10：”4695″，“买一”申请4695股，即47手；
'11：”26.91″，“买一”报价；
'12：”57590″，“买二”
'13：”26.90″，“买二”
'14：”14700″，“买三”
'15：”26.89″，“买三”
'16：”14300″，“买四”
'17：”26.88″，“买四”
'18：”15100″，“买五”
'19：”26.87″，“买五”
'20：”3100″，“卖一”申报3100股，即31手；
'21：”26.92″，“卖一”报价
'(22, 23), (24, 25), (26,27), (28, 29)分别为“卖二”至“卖四的情况”
'30：”2008-01-11″，日期；
'31：”15:05:32″，时间；
Function getFundData(ByRef StockCode As String)
Url = "http://hq.sinajs.cn/list=" + StockCode
strData = GetHttp(Url)
strData = Replace(strData, Chr(13), "")
strData = Replace(strData, Chr(10), "")

Set objREGEXP = CreateObject("VBSCRIPT.REGEXP")
With objREGEXP
.Global = True
.Pattern = "var hq_str_.*=\"""
strData = .Replace(strData, "")
.Pattern = "\"";"
strData = .Replace(strData, "")

End With
Set objREGEXP = Nothing

getFundData = Split(strData, ",")

End Function

2021-11-30 20:52 引用

大道之行也 - 大道至简，大道止简；简单投资，静待花开！

赞同来自: pqfund 、hnhaiou 、sothin 、lpl94 、ryanxzqn 更多 »

下午时犯了个错，用的不是腾讯文档，而是企业微信内嵌的在线文档，所以调用出现了问题，刚才重新试了一下，可以调用了！同时发现=STOCK("123109.SZ",8)就是调用实时股价

具体见链接：
【腾讯文档】腾讯文档调用证券信息模板
https://docs.qq.com/sheet/DVFRVZ2ZRaERJS1B1

PS：只是初步整了个数据，可以据此整理自己感兴趣的数据

2021-11-30 20:23 引用

大道之行也 - 大道至简，大道止简；简单投资，静待花开！

赞同来自: pqfund 、大象小尚、ryanxzqn

腾讯在线文档好像有限制，摸索出来部分，但都是前一个交易日的数据

=STOCK("123109.SZ",0) 股价
=STOCK("123109.SZ",1) 名称
=STOCK("123109.SZ",2) 涨跌额
=STOCK("123109.SZ",3) 涨跌幅
=STOCK("123109.SZ",4) 开盘价
=STOCK("123109.SZ",5) 最高价
=STOCK("123109.SZ",6) 最低价
=STOCK("123109.SZ",7) 成交额

分享文档用的是企业微信登陆，涉及隐私太多，删除了！

2021-11-30 16:49修改引用

要回复问题请先登录或注册

在线文档能否调用实时股价？

14 个回复

发起人

问题状态