历史股票行情数据获取

‘壹’ 如何下载股票历史成交数据到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建立炒股系统的整套方法，请看后续内容。"

‘贰’ 如何查询股票的历史价格走势

下载一个股票行情软件同花顺，选择你要查询的股票的日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线图缩小，使之能显示更长的时间，拖动鼠标选中你需要查询股票历史行情的时间段。并单击右键可将选中的时间段放大，以便查看。

‘叁’ 怎样导出股票历史价格数据

这里笔者以同花顺软件为例：
1. 首先点按电脑界面上的同花顺图标
2. 输入用户名和密码之后点按登录
3. 进入同花顺界面后点按界面左侧的自选股按钮 然后点按自选股中收藏的某个股票
4. 右键点按自选股中收藏的某支股票 在弹出的菜单中点按数据导出 然后在二级菜单中点按导出所有数据
5. 在浏览按钮下选择导出文件位置 这里选择了桌面 然后选择导出的类型为excel 然后点按下一步
6. 勾选所有需要导出的项目 然后点按下一步
7. 最后点按完成
8. 此时在桌面上可以看到导出的文件 文件名字为table 双击进入该文件
9. 打开excel文件之后选中行标2行标3 然后点按右键 然后在弹出的菜单中点按复制
10. 点按复制之后 着两行周围出现闪烁的虚线
11. 为这两行新添加的数据添加日期
12. 点按数据下的排序按钮 以名称为第一关键字 日期为第二关键字进行排序
同花顺，是一款功能非常强大的免费网上股票证券交易分析软件，投资者炒股的必备工具。
同花顺股票软件是一个提供行情显示、行情分析和行情交易的股票软件，它分为免费PC产品，付费PC产品，电脑平板产品，手机产品等适用性强的多个版本。同花顺股票软件注重各大证券机构、广大股民的需求和使用习惯，同花顺股票软件全新版免费免注册。全新版同花顺股票软件新增强大功能：自主研发的问财选股及自定义选股，问财选股是新一代自然语言选股，解析自然语言选出股票。新增通达信模式。
同花顺面向客户可为银行、证券、保险、基金、私募、高校、政府等行业提供智能化解决方案。正在拓展至生活、医疗、教育等更多领域。
2020年1月9日，胡润研究院发布《2019胡润中国500强民营企业》，同花顺以市值490亿元位列第135位。

‘肆’ 股票怎么查历史数据

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

‘伍’ 怎样查询一只股票的历史行情详细数据，高分求详细步骤

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

‘陆’ 股票的历史价位怎样查找

1，打开行情交易软件；，2，在菜单栏选择“系统”；3，选择“盘后数据下载”；
，4，数据下载完成后即可查看如上证指数1990年12月19日以来的所有历史数据。 补充资料 1、促进证监会职能转变，切实增强监管责任
股票发行实行核准制将进一步转变证监会发行监管的职能。监管机构不应该也没有必要介入应由中介机构、投资者和发行人承担的具体事务。监管部门将根据市场发展的需要，充分发挥自律组织的功能，不断完善法规，并监督法规的执行，从而在更高层次上监管发行市场。市场监管者的主要职能应当转向规定标准和规则，促进法规和政策体系的完善，并严格执法，以此维护一个公平、透明、高效、有序的市场。
2、有助于提高发行企业的行业代表性、业绩成长性和质量真实性，充分发挥证券市场优化资源配置功能
实行核准制后，发行股票的公司主要由市场选择，将促使寻求发行上市的公司从经营、管理等方面着眼，改善公司业绩和整体形象，争取早日发行上市。在这种情况下，发行上市公司不再是一种稀缺资源，企业能否核准发行上市主要取决于自己的业绩和实力，取决于能否达到发行上市的标准。如果发行上市公司质量能由此得到明显提高，证券市场的投资价值将与日俱增，从而形成新的良好的投资环境，为促进国民经济结构调整和发展起到更大的积极作用。
3、券商承销业务的风险和责任增大，对券商提出了更高要求
实行核准制后，承销的证券公司是以自己的信誉向投资者推介上市公司的股票，对违法违规行为还要负连带法律责任，信誉成了证券经营机构的生存之本。证券公司会更加重视提高投资银行业务的能力，并把主要精力放在挖掘和培育上市公司上；会更加重视研究力量对投资银行业务的支持和配合，建立健全项目风险评估制度；，会努力在竞争中成为公司和行业问题专家，并形成自己的品牌效应。
4、促进投资者走向成熟，结构得到改善
实行核准制后，监管机构的主要职能将转向制定标准和规则，切实加强市场监管。投资者则需要确立理性投资的观念，重视分析研究公司所披露的各种信息，对公司管理层、中介机构行使股东监督的权利。提高整个市场对公司内在价值的分析和判断能力。
5、解决证券市场供求不均衡的矛盾，使一、二级市场的风险和收益趋于对称
实行核准制后，股票发行采取溢价发行的，其发行价格由发行人和承销商协商确定，报证券监管机构核准。这样，发行公司为更多筹资而承销的证券公司为降低风险，则有一个协商定价的过程。它们既要判断发行人的行业前景、经营业绩、财务状况，又要参照二级市场的价格走势，因而不同行业、不同质地的企业股票发行定价将可能有较大差别，一级市场与二级市场的股价走势将会趋于平衡，从而使一级市场与二级市场的风险、收益也趋于均衡。
6、为我国证券市场国际化奠定基础，促进证券市场制度体系与国际接轨
我国《证券法》规定的股票发行核准制，与国际股票发行上市规则原则一致。通过与国际市场接轨，股票发行方式将更加灵活多样，为我国公司在国际市场上融资创造了较为畅通的渠道。第七章、实行股票发行核准制后可能出现的风险
市场化条件下可能会出现发行失败的情况

‘柒’ 如何获取股票历史数据

如何快速取得股票交易历史数据，直接在交易软件里面查看历史成交就知道了，可以设置一个个时间段进行查询。查询到的数据可以直接导出。

‘捌’ 股票怎么查历史数据

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

‘玖’ 如何查询股票历史价格>>>百度

通过行情软件可以查询到股票的历史价格，比如大智慧、通达信等。
那大家知道什么是股票做T吗？今天就给大家详细的说一下股票做T的相关内容。
在开始以前，大家可以看一下我为大家准备的一点惊喜，机构精选的牛股大盘点--速领！今日机构牛股名单新鲜出炉！
一、股票做T是什么意思
目前，A股的交易市场模式是T＋1，也就是当天买入的股票，隔天才能卖出。
而股票做T，当天买入的股票在当天卖出，这就是股票进行T＋0的交易操作，也就是投资人在交易当天买入股票，通过涨跌做差价，股票大幅下跌的时候立马跟进，待其涨到一定程度再将买入的部分卖出，这样就能得到利润。
列举一下，我昨天持有1000股的xx股票，市价10元/股。在今早时发现该股大幅下跌至9.5元/股，立刻买入了1000股。时间就这样到了下午，这支股票的价格就突然上涨了，还是大幅度上涨，一股10.5元，我就看准时机立刻以这个价格售出1000股，因此得到（10.5－9.5）×1000＝1000元的差价，这类情况就是做T。
其实不是所有的股票，它们都适合做T！大部分情形下，对于日内振幅空间较大的股票，会更适合做T，例如每一天能提供5%的振幅空间。想知道某只股票会不会赔钱的，点开这里去看一下吧，即有专业人员帮你诊股，挑选出适合做T的股票！【免费】测一测你的股票到底好不好？

二、股票做T怎么操作
那么股票做到T应该怎么进行去操作呢？正常情况下分为两种方式，分别为正T和倒T。
正T即先买后卖，这款股票一直在投资者手里面，投资者在开盘当天股票下跌到低点时买入1000股，当股票冲到当天的最高点的时候，就将这买来的1000股票全部卖出，这样总持股数保持不变，T＋0的效果这样就能够达到了，又能够享有中间赚取的差价。
而倒T即先卖后买。当投资者预算到股票行情不好，会出现下跌情况，因此，他们选择在高位点先卖出去一些股票，等股价回落后再买进，总量依然可以达到保持不变，不过可以拿到收益。
例如投资者具有该股2000股，该股的价格在今天早上是10元/股，认定该股在当天或者较短时间内有所涨跌，那么可以先卖出1500股做个尝试，当股票价格不断下降直到9.5元时，他们就能从其中获得让自己满意的收入了，再买入1500股，这就赚取了（10-9.5）×1500＝750元的差价。
这时就会有人感到疑惑了，那要怎样判断什么时候是低点可以买入，什么时候是高点可以卖出？
买卖点捕捉神器可以判断股票趋势，只要拥有它，绝对能让你每次都抓住重点，点开下面的链接领走吧：【智能AI助攻】一键获取买卖机会

应答时间：2021-09-23，最新业务变化以文中链接内展示的数据为准，请点击查看