导航:首页 > 数据行情 > 获取腾讯股票历史数据

获取腾讯股票历史数据

发布时间:2022-10-06 22:23:01

❶ 股票怎么查历史数据

1、打开自己的手机桌面,选择大智慧这个图标进入。


❷ 如何查询股票的历史股价

在股票交易系统中,输入个股代码或简称,按快捷键F10即可查看股票的行情了,其中会有股票的历史数据,比如上市时间、发行价格等数据信息。或者,到一些证券公司网站上查看也可以。

股票是股份公司发行的所有权凭证,是股份公司为筹集资金而发行给各个股东作为持股凭证并借以取得股息和红利的一种有价证券。每股股票都代表股东对企业拥有一个基本单位的所有权。每支股票背后都有一家上市公司。同时,每家上市公司都会发行股票的。

在当代国际贸易迅速发展的潮流中,汇率对一国经济的影响越来越大。

任何一国的经济都在不同的程度上受汇率变动的影响,而且,汇率变动对一国经济的影响程度取决于该国的对外开放度程度,随着各国开放度的不断提高,股市受汇率的影响也日益扩大。

但最直接的是对进出口贸易的影响,本国货币升值受益的多半是进口业,亦即依赖海外供给原料的企业;相反的,出口业由于竞争力降低,而导致亏损。

可是当本国货币贬值时,情形恰恰相反。但不论是升值或是贬值,对公司业绩以及经济局势的影响,都各有利弊,所以,不能单凭汇率的升降而买入或卖出股票,这样做就会过于简单化。

汇率变动对股价的影响,最直接的是那些从事进出口贸易的公司的股票。它通过对公司营业及利润的影响,进而反映在股价上,其主要表现是:

⑴若公司的产品相当部分销售海外市场,当汇率提高时,则产品在海外市场的竞争力受到削弱,公司盈利情况下降,股票价格下跌。

⑵若公司的某些原料依赖进口,产品主要在国内销售,那么汇率提高,使公司进口原料成本降低,盈利上升,从而使公司的股价趋于上涨。

⑶如果预测到某国汇率将要上涨,那么货币资金就会向上升转移,而其中部分资金将进入股市,股票行情也可能因此而上涨。

因此,投资者可根据汇率变动对股价的上述一般影响,并参考其它因素的变化进行正确的投资选择。

❸ 如何下载股票历史成交数据到Excel或txt

以华中智能股票软件为例:(以Think pad X13 锐龙版笔记本电脑,Windows 10 操作为例)首先切换到要下载数据的股票K线形态,按“F1”进入“日线某某股票历史成交”,点击鼠标右键->数据导出->导出所有数据->在“请选择导出的类型”中选择excel或txt
补充资料:
如何获取所有股票历史数据:
如果要对股市进行分析,首先就要获取所有股票的历史数据,只有通过股票的历史数据,我们才能分析出股市的规律。
(以Think pad X13 锐龙版笔记本电脑,Windows 10 操作为例)
一、工具/原料
1、EXCEL2007或者以上版本,不能使用WPS
2、电脑1g内存1核处理器及以上配置
3、拥有较强逻辑分析能力以及少量智慧及以上的大脑一颗
方法/步骤:
第一步,获取股票代码,复制其中一部分到第一个工作表A4到A127,然后通过程序把每一个代码写入到不同的工作表A2位置,并对该工作表以该股票代码命名。程序如下:
Sub 工作表命名()
For i = 4 To 127
Sheets(i).Range("a2") = "'" & Sheets(1).Range("a" & i)
Next i
For i = 4 To Sheets.Count
Sheets(i).Name = Sheets(i).Range("a2").Value
Next
End Sub
第二步,获取股票历史数据。代码如下:
Private Function GetSource(sURL As String) As String
Dim oXHTTP As Object
Set oXHTTP = CreateObject("MSXML2.XMLHTTP")
oXHTTP.Open "GET", sURL, False
oXHTTP.Send
GetSource = oXHTTP.responsetext
Set oXHTTP = Nothing
End Function
Sub 历史数据()
Dim objXML As Object
Dim txtContent As String
Dim i As Integer
Dim strCode As String
Dim gp As String
Dim kaishihang
Dim arr, arr1, arr2, arr3, arr4, arr5, arr6, arr7, arr8, arr9, arr10, arr11
On Error Resume Next
EndRow = Range("a65536").End(xlUp).Row
startRow = 4
If startRow <= EndRow Then
Range(Cells(startRow, 1), Cells(EndRow, 11)).Value = ""
Else
Exit Sub
End If
Set objXML = CreateObject("Microsoft.XMLHTTP")
gp = [A2]
For h = 1 To 4
For m = 1 To 4
kaishihang = [A65535].End(xlUp).Row
nian = Replace(Str(Year(Now) + 1 - h), " ", "")
ji = Replace(Str(4 + 1 - m), " ", "")
With objXML
.Open "GET", "http://quotes.money.163.com/trade/lsjyj_" + gp + ".html?year=" + nian + "&season=" + ji + "", False
.Send
If objXML.Status = 200 Then
txtContent = .responsetext
arr = Split(txtContent, "'>")
For i = 1 To UBound(arr)
arr1 = Split(arr(i), " Cells(i + kaishihang, 1) = Right(Left(arr1(0), 10), 10)
arr2 = Split(arr1(1), Chr(60))
Cells(i + kaishihang, 2) = Mid(arr2(0), InStr(arr2(0), ">") + 1)
arr3 = Split(arr1(2), Chr(60))
Cells(i + kaishihang, 3) = Mid(arr3(0), InStr(arr3(0), ">") + 1)
arr4 = Split(arr1(3), Chr(60))
Cells(i + kaishihang, 4) = Mid(arr4(0), InStr(arr4(0), ">") + 1)
arr5 = Split(arr1(4), Chr(60))
Cells(i + kaishihang, 5) = Mid(arr5(0), InStr(arr5(0), ">") + 1)
arr6 = Split(arr1(5), Chr(60))
Cells(i + kaishihang, 6) = Mid(arr6(0), InStr(arr6(0), ">") + 1)
arr7 = Split(arr1(6), Chr(60))
Cells(i + kaishihang, 7) = Mid(arr7(0), InStr(arr7(0), ">") + 1)
arr8 = Split(arr1(7), Chr(60))
Cells(i + kaishihang, 8) = Mid(arr8(0), InStr(arr8(0), ">") + 1)
arr9 = Split(arr1(8), Chr(60))
Cells(i + kaishihang, 9) = Mid(arr9(0), InStr(arr9(0), ">") + 1)
arr10 = Split(arr1(9), Chr(60))
Cells(i + kaishihang, 10) = Mid(arr10(0), InStr(arr10(0), ">") + 1)
arr11 = Split(arr1(10), Chr(60))
Cells(i + kaishihang, 11) = Mid(arr11(0), InStr(arr11(0), ">") + 1)
Next i
End If
End With
Next m
Next h
Set objXML = Nothing
End Sub
第三步,获取上证历史数据,并获取所有股票的历史数据。程序如下:
Sub 所有股票历史数据获取()
Application.ScreenUpdating = False
Dim s As String, gp As String, nian As String, ji As String, s1 As String
Dim arr, arr1, arr2, arr3, arr4, arr5, arr6, arr7, arr8, arr9
Dim i, h As Long
Dim kaishihang
Dim LastRow As Long, r As Long
On Error Resume Next
EndRow = Sheet2.Range("a65536").End(xlUp).Row
startRow = 4
If startRow <= EndRow Then
Sheet2.Range(Sheet2.Cells(startRow, 1), Sheet2.Cells(EndRow, 9)).Value = ""
Else
Exit Sub
End If
For h = 1 To 5
For m = 1 To 4
kaishihang = Sheet2.[A65535].End(xlUp).Row
nian = Replace(Str(Year(Now) + 1 - h), " ", "")
ji = Replace(Str(4 + 1 - m), " ", "")
s1 = "http://quotes.money.163.com/trade/lsjysj_shu_000001.html?year=" + nian + "&season=" + ji + ""
s = GetSource(s1)
arr = Split(s, "'>")
For i = 1 To UBound(arr)
arr1 = Split(arr(i), " Sheet2.Cells(i + kaishihang, 1) = Right(Left(arr1(0), 4), 4) & "-" & Right(Left(arr1(0), 6), 2) & "-" & Right(Left(arr1(0), 10), 2)
arr2 = Split(arr1(1), Chr(60))
Sheet2.Cells(i + kaishihang, 2) = Mid(arr2(0), InStr(arr2(0), ">") + 1)
arr3 = Split(arr1(2), Chr(60))
Sheet2.Cells(i + kaishihang, 3) = Mid(arr3(0), InStr(arr3(0), ">") + 1)
arr4 = Split(arr1(3), Chr(60))
Sheet2.Cells(i + kaishihang, 4) = Mid(arr4(0), InStr(arr4(0), ">") + 1)
arr5 = Split(arr1(4), Chr(60))
Sheet2.Cells(i + kaishihang, 5) = Mid(arr5(0), InStr(arr5(0), ">") + 1)
arr6 = Split(arr1(5), Chr(60))
Sheet2.Cells(i + kaishihang, 6) = Mid(arr6(0), InStr(arr6(0), ">") + 1)
arr7 = Split(arr1(6), Chr(60))
Sheet2.Cells(i + kaishihang, 7) = Mid(arr7(0), InStr(arr7(0), ">") + 1)
arr8 = Split(arr1(7), Chr(60))
Sheet2.Cells(i + kaishihang, 8) = Mid(arr8(0), InStr(arr8(0), ">") + 1)
arr9 = Split(arr1(8), Chr(60))
Sheet2.Cells(i + kaishihang, 9) = Mid(arr9(0), InStr(arr9(0), ">") + 1)
Next i
Next m
Next h
Application.ScreenUpdating = True
n = Worksheets.Count
For i = 4 To n
Worksheets(i).Activate
历史数据
Next
End Sub
第四步,保存工作簿,并对该工作簿命名为1,然后复制该工作簿27份,把所有股票代码写入每一个工作簿第一个工作表的A3到A127列。然后根据第一步对工作簿内的工作表命名,并在每一个工作表A2单元格内写入股票代码。
第五步,把这些工作簿存放到炒股文件夹下的数据库文件下。然后在炒股文件夹下新建一个工作簿,命名为“一键更新表格”,写入如下代码:
Sub 所有股票历史数据更新()
Dim wb As Workbook
For i = 1 To 27
Set wb = Workbooks.Open(ThisWorkbook.Path & "数据库" & i & "".xlsb"")
Application.Run ""'"" & wb.Path & """" & i & "".xlsb'!所有股票历史数据获取""
wb.Save
wb.Close
Next i
End sub
当启动这一段代码以后,程序会自动一个一个的打开对应的工作簿然后获取里面所有股票的历史数据,存放在对应的工作表当中。
第六步,对相应的程序添加按钮,这样,我们在启动对应程序时,只需要点一下对应的按钮就可以实现了。这样,我们通过多个工作簿就实现了获取所有股票历史数据的方法。而后面,我们只需要通过获取对应股票每一天的历史数据,我们就能够在任意一天很快速的能够拥有所有股票的历史数据了。
注意事项
1、在后续需要对这些数据进行分析,里面会加入很多计算,所以启动所有历史数据更新时,我们应该要关闭自动更新。
2、因为历史数据很大,所以这里只获取四年的数据,想要获取更多数据,可以更改程序里面 “For h = 1 To 5”的那个5即可。
3、历史数据的获取需要较长的时间,要提前做好准备。
4、如果你想要弄清楚用EXCEL建立炒股系统的整套方法,请看后续内容。"

❹ 什么软件能下载股票的历史数据,怎么下

下载股票历史数据步骤如下:

1、登录股票软件,点击左上角系统,选择子菜单下面的盘后数据下载

❺ 怎样查询一只股票的历史行情详细数据,高分求详细步骤

1、打开自己的手机桌面,选择大智慧这个图标进入。

❻ 如何快速取得股票交易历史数据

示例:

最近二十天左右的每5分钟数据

网页链接

(参数:股票编号、分钟间隔(5、15、30、60)、均值(5、10、15、20、25)、查询个数点(最大值242))

返回数据格式:日期、开盘价、最高价、最低价、收盘价、成交量

❼ 如何查询股票的历史价格走势

下载一个股票行情软件同花顺,选择你要查询的股票的日K线、周K线或者月K线图,用你键盘上的左箭头键向左移动,即可了解股票的历史价格走势。
股票的历史价位功要用电脑的行情交易软件才能查询,具体方法如下:(同花顺 谷歌浏览器电脑端:macbookpro mos14打开google版本 92.0.4515.131 同花顺10.39.50)
1、打开行情交易软件;
2、在菜单栏选择“系统”;
3、选择“盘后数据下载”;
4、数据下载完成后即可查看如上证指数1990年12月19日以来的所有历史数据。
可以去下载个通信达行情软件,进入想查的那只股票的K线图里面后按方向键的下键↓ ,就可以完整的查看这支股票的历史价格走势了。股票是股份证书的简称,是股份公司为筹集资金而发行给股东作为持股凭证并借以取得股息和红利的一种有价证券。每股股票都代表股东对企业拥有一个基本单位的所有权。同一类别的每一份股票所代表的公司所有权是相等的。每个股东所拥有的公司所有权份额的大小,取决于其持有的股票数量占公司总股本的比重。股票是股份公司资本的构成部分,可以转让、买卖或作价抵押,是资本市场的主要长期信用工具,但不能要求公司返还其出资。
打开交易软件,交易软件均可查询股票历史行情,不同的交易软件查询方法基本一致,并使用注册好的账号登录交易软件,进入交易软件的主界面,在交易软件的右下角,打开搜索窗口,根据拼音或代码进行搜索。输入需要查询股票的拼音首字母或股票代码进行查询,再搜索框下方会显示匹配的股票,进入指定的股票界面后,按F5即可进入k线图界面,按F5可在股票不同功能界面进行切换。按键盘的向下方向键可将k线图缩小,使之能显示更长的时间,拖动鼠标选中你需要查询股票历史行情的时间段。并单击右键可将选中的时间段放大,以便查看。

❽ 怎样查股票历史明细

操作环境:
品牌型号:iPhone13
系统版本:iOS15.4
app版本:v11.00.10
以同花顺为例:
股票账户可以随时查看,方法是打开股票软件之后,按照你买入股票的程序操作,账户页面显现之后,点击【股票资金】菜单,历史数据即可看得清清楚楚。
【拓展资料】
股票收益:
股票收益即股票投资收益,是指企业或个人以购买股票的形式对外投资取得的股利,转让、出售股票取得款项高于股票账面实际成本的差额,股权投资在被投资单位增加的净资产中所拥有的数额等。股票收益包括股息收入、资本利得和公积金转增收益。
分类:
普通股:
普通股是指在公司的经营管理和盈利及财产的分配上享有普通权利的股份,代表满足所有债权偿付要求及优先股东的收益权与求偿权要求后对企业盈利和剩余财产的索取权。普通股构成公司资本的基础,是股票的一种基本形式。现上海和深圳证券交易所上进行交易的股票都是普通股。
普通股股东按其所持有股份比例享有以下基本权利:
(1)公司决策参与权。普通股股东有权参与股东大会,并有建议权、表决权和选举权,也可以委托他人代表其行使其股东权利。
(2)利润分配权。普通股股东有权从公司利润分配中得到股息。普通股的股息是不固定的,由公司赢利状况及其分配政策决定。普通股股东必须在优先股股东取得固定股息之后才有权享受股息分配权。
(3)优先认股权。如果公司需要扩张而增发普通股股票时,现有普通股股东有权按其持股比例,以低于市价的某一特定价格优先购买一定数量的新发行股票,从而保持其对企业所有权的原有比例。
(4)剩余资产分配权。当公司破产或清算时,若公司的资产在偿还欠债后还有剩余,其剩余部分按先优先股股东、后普通股股东的顺序进行分配。
优先股:
优先股相对于普通股。优先股在利润分红及剩余财产分配的权利方面优先于普通股。
(1)优先分配权。在公司分配利润时,拥有优先股票的股东比持有普通股票的股东,分配在先,但是享受固定金额的股利,即优先股的股利是相对固定的。
(2)优先求偿权。若公司清算,分配剩余财产时,优先股在普通股之前分配。注:当公司决定连续几年不分配股利时,优先股股东可以进入股东大会来表达他们的意见,保护他们自己的权利。
后配股:
后配股是在利益或利息分红及剩余财产分配时比普通股处于劣势的股票,一般是在普通股分配之后,对剩余利益进行再分配。如果公司的盈利巨大,后配股的发行数量又很有限,则购买后配股的股东可以取得很高的收益。发行后配股,一般所筹措的资金不能立即产生收益,投资者的范围又受限制,因此利用率不高。后配股一般在下列情况下发行:
(1)公司为筹措扩充设备资金而发行新股票时,为了不减少对旧股的分红,在新设备正式投用前,将新股票作后配股发行;
(2)企业兼并时,为调整合并比例,向被兼并企业的股东交付一部分后配股;
(3)在有政府投资的公司里,私人持有的股票股息达到一定水平之前,把政府持有的股票作为后配股。

❾ 如何查询股票的历史股价

在股票交易系统中,输入个股代码或简称,按快捷键F10即可查看股票的行情了,其中会有股票的历史数据,比如上市时间、发行价格等数据信息。或者,到一些证券公司网站上查看也可以。

股票是股份公司发行的所有权凭证,是股份公司为筹集资金而发行给各个股东作为持股凭证并借以取得股息和红利的一种有价证券。每股股票都代表股东对企业拥有一个基本单位的所有权。每支股票背后都有一家上市公司。同时,每家上市公司都会发行股票的。

在当代国际贸易迅速发展的潮流中,汇率对一国经济的影响越来越大。

任何一国的经济都在不同的程度上受汇率变动的影响,而且,汇率变动对一国经济的影响程度取决于该国的对外开放度程度,随着各国开放度的不断提高,股市受汇率的影响也日益扩大。

但最直接的是对进出口贸易的影响,本国货币升值受益的多半是进口业,亦即依赖海外供给原料的企业;相反的,出口业由于竞争力降低,而导致亏损。

可是当本国货币贬值时,情形恰恰相反。但不论是升值或是贬值,对公司业绩以及经济局势的影响,都各有利弊,所以,不能单凭汇率的升降而买入或卖出股票,这样做就会过于简单化。

汇率变动对股价的影响,最直接的是那些从事进出口贸易的公司的股票。它通过对公司营业及利润的影响,进而反映在股价上,其主要表现是:

⑴若公司的产品相当部分销售海外市场,当汇率提高时,则产品在海外市场的竞争力受到削弱,公司盈利情况下降,股票价格下跌。

⑵若公司的某些原料依赖进口,产品主要在国内销售,那么汇率提高,使公司进口原料成本降低,盈利上升,从而使公司的股价趋于上涨。

⑶如果预测到某国汇率将要上涨,那么货币资金就会向上升转移,而其中部分资金将进入股市,股票行情也可能因此而上涨。

因此,投资者可根据汇率变动对股价的上述一般影响,并参考其它因素的变化进行正确的投资选择。

❿ 哪些炒股软件能查到历史数据比如股东人数

关于股东人数,我发现QQ的股票可以查到历史的所有股东人数。
方法:在腾讯网上查看你想看的股票行情,然后在那个网页的最下面,有个流通股东,点后面的“更多>>”,打开一个新页面,你应该能找到“股东户数”,点一下,就可以查到股东人数的所有历史数据了。自己试试,没明白再问。

阅读全文

与获取腾讯股票历史数据相关的资料

热点内容
基金和股票哪个适合长期 浏览:462
app才能股票中签 浏览:84
st股票重组后涨跌幅 浏览:979
退市之后的股票去哪里查询 浏览:407
600072中船科技股票公告 浏览:1000
容百科技股票股价 浏览:426
股票主力流出高于流入 浏览:354
公司收购完成后的股票走势 浏览:154
股票软件为什么只有4根均线 浏览:806
债券风险大还是股票 浏览:837
以前融资买的股票st了怎么办 浏览:804
价值投资股票卖出策略 浏览:793
股票是不是小盘股看什么指标 浏览:3
股票账号闲置资金理财 浏览:296
用单只股票申购etf 浏览:142
股票投资分析论文提问 浏览:183
股票跌涨时间 浏览:156
股票现金结余 浏览:692
数知科技股票新浪财经 浏览:205
可供出售金融资产的股票持有分录 浏览:178