获取股票数据历史高价

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

这里笔者以同花顺软件为例：
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位。

‘贰’ 如何得到股票的历史开盘数据（包括开盘成交量）

双击某一天的K线，右下角会有当天分时图。
我们所说的股票成交量，就是交易成功的股票数量，即一天之内就完成成交的股票总数量（1手=100股）
正常来说，股票成交量能让我们看出个股或者大盘的活跃程度，有助于我们从众多股票中选中最好的一个、识别买入和卖出的时机。
那股票成交量具体怎么看？有没有比较好的办法可以全面分析股票？有没有值得我们注意的地方呢？我来为大家做详细的说明，大家可以接着往下看。
在这之前，先给大家发福利，我整理各行业的龙头股信息，涉及医疗、新能源、白酒、军工等热门行业，随时可能被删：吐血整理！各大行业龙头股票一览表，建议收藏！
一、股票成交量怎么看？有没有比较好的办法可以全面分析股票？
股票成交量可以通过交易软件来查看，开盘之后的买入卖出数量，可以看出来确切的成交量。或者看红绿柱，股票的成交量可以通过柱体的颜色要直接反映出来：红柱体代表买入﹥卖出；绿柱体代表买入﹤卖出。
要想股票炒得好，实用工具少不了，吐血整理的【股票研究9大神器】。点击领取：超实用炒股的九大神器，建议收藏

二、股票成交量大就一定好吗？
股票的成交量与股票的好坏没有直接联系，只能关于这支股票的价格，说买卖双方有着非常大的分歧。
像一些热门股票，买的人认为价格会上涨，卖的人认为价格会下跌，双方分歧很大，那成交量就会很高，反之成交量就很低。
成交量通常和股价趋势结合在一起看会更好：上涨趋势中，成交量会放大的很快，随着价格一直在抬升当中，买卖双方的分歧也越来越大了，股票持有者不断地将股票卖出此时追涨需要有所戒备了；成交量会随趋势下跌而减少，买卖双方意见相同，未来就很有可能会继续下跌。
除了这几种，股票成交量还存在其他情况，字数有限，没办法一一给大家讲解，大家可以点击下方链接，输入你中意的股票，就能免费获得个股成交量分析报告：【免费】测一测你的股票当前估值位置？

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

‘叁’ 如何下载股票历史成交数据到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线，统计表格里面就直接就有结果。

‘伍’ 哪有A股所有股票的每天开盘价、收盘价、最高价、最低价、成交量等数据，要历史数据

下载中信建投大智慧，进入K线图界面，单击鼠标右键，在弹出的菜单中选复制数据，会出提示数据已复制到剪切板，然后，你打开一个空白页的excel表，直接点粘贴，全部数据就完整的复到电子表格里了，然后保存表格就可以了。
所谓的股票成交量，也就是买股票和卖出股票数量的总和，也就是当天成交的所有股票数量（1手=100股）
一般来说，股票成交量能体现出个股或者大盘的活跃程度，有助于我们从众多股票中选中最好的一个、识别买入和卖出的时机。
采取什么方法可以看股票成交量？有没有一些分析技巧可以分享？我们要注意的地方又有哪些？我来为大家做详细的说明，大家可以接着往下看。
在这之前，先给大家发福利，我整理各行业的龙头股信息，涉及医疗、新能源、白酒、军工等热门行业，随时可能被删：吐血整理！各大行业龙头股票一览表，建议收藏！
一、股票成交量怎么看？有没有一些分析技巧可以分享？
交易软件上就有具体的股票成交量，开盘之后的买入卖出数量，可以看出来确切的成交量。或者看红绿柱，它们更生动形象地反映了股票的成交数量：红柱体代表买入﹥卖出；绿柱体代表买入﹤卖出。
要想股票炒得好，实用工具少不了，吐血整理的【股票研究9大神器】。点击领取：超实用炒股的九大神器，建议收藏
二、股票成交量大就一定好吗？
股票成交量大不能决定这只股票就是好的，只能说对于这支股票的价格买卖双方有着完全不一样的想法。
像一些热门股票，买的人认为价格会上涨，卖的人认为价格会下跌，双方分歧很大，那成交量就会很高，反之成交量就很低。
成交量一般可以配合着股价趋势来看：上涨趋势中，成交量迅速放大，随着价格不断的抬升，分歧方面买卖双方越来越猛烈，股票卖出数量越来越多此时追涨需要有所戒备了；在下跌趋势中，成交量会逐渐缩小，买卖双方没有什么分歧的话，未来继续下跌就有很大的可能。
除去这几类，股票成交量还会有别的情况，因为篇幅有限，我就不进一步解说了，大家可以点击下方链接，输入你中意的股票，就能免费获得个股成交量分析报告：【免费】测一测你的股票当前估值位置？

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

‘陆’ 如何快速取得股票交易历史数据

示例：

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

网页链接

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

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

‘柒’ 请问怎么获取股票的历史价格

方法有二：
1、在股票行情软件中，打开相关的K线图，你一根K线去手动记录历史价格。将十字光标放到K线上，该K线的最高价，最低价，收盘价，开盘价等都会出来。
2、去搜狐的历史行情数据中下载，他有专门的上证，深证等的历年的数据表，下载可用。

‘捌’ 同花顺如何查询个股的历史收盘价

交易软件上就能查看，以同花顺为例，查看流程：打开同花顺交易软件—选择个股—左滑至K线图—点击“前一交易日的K线”—左上方的价格就是昨天收盘价。

沪市收盘价是以最后一分钟所有成交的加权平均价得出来的，深市、创业板和科创板是以最后三分钟（集合竞价），最大成交量的价格为收盘价。

1、选好股票“华丽家族”，点击左侧菜单栏中的“K线图”。

2、得到其具体的曲线图。

3、点击键盘F1，进入到历史数据界面。

4、在历史数据界面上，鼠标右键出现菜单选择“数据导出”，选择”导出所有数据“。可以选择保存路径“桌面”。

5、然后“下一步”，选择自己需要的元素。然后再下一步，完成。

6、打开桌面“

Table.xls

”,文件就可以看到了

无法单独下载收盘价。

股票软件默认的下载是同时下载开盘价+最高价+最低价+收盘价。你可以利用同花顺的数据管理来导出这些数据，在相应的界面会导出相应数量的股票数据，比如在沪深A股界面，可以导出全部A股资料，在自选股界面可以导出全部自选股数据。

导出方法：工具--公式管理--导出【选择要导出的指标】。

周K线是指以周一的开盘价，周五的收盘价，全周最高价和全周最低价来画的K线图。月K线则以一个月的第一个交易日的开盘价，最后一个交易日的收盘价和全月最高价与全月最低价来画的K线图，同理可以推得年K线定义。周K线，月K线常用于研判中期行情。

意义：

周K线较之日线而言，属于偏中期K线形态，其走势也多表现了市场较长周期的变化。在趋势波段操作中，偏重的是一段完整的波段，因此在时间周期上周线便较日线更为准确适合。本质上说，趋势波段理论属技术分析理论范畴，因此其重点仍应着眼于K线形态、技术指标与成交量的分析上。

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

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

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

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