版块历史数据怎么下载

A. 什么软件能下载股票的历史数据，怎么下

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

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

B. 怎么下载行业板块的历史日数据

行业是从事国民经济中同性质的生产和其他经济社会活动的经营单位和个体机构的组织结构体系等。行业的分类法有：1道—琼斯分类法
2标准行业分类法
3我国国民经济的行业分类法
4我国上市公司的行业分类。
依据行业分类方法的不同，行业板块有不同的理解。
飞机制造

印刷包装

摩托车

房地产

公路桥梁

纺织机械

酿酒行业

水泥行业

生物制药

商业百货

钢铁行业

交通运输

传媒娱乐

塑料制品

酒店旅游

石油行业

开发区

陶瓷行业

家电行业

建筑行业

食品行业

金融行业

造纸行业

船舶制造

化纤行业

电力行业

汽车类

纺织行业

综合行业

玻璃行业

农林牧渔

电器行业

机械行业

医疗器械

物资外贸

有色金属

仪器仪表

化工行业

服装鞋类

电子器件

电子信息

供水供气

煤炭行业

农药化肥

环保行业

发电设备

家具行业

自行车

行业板块对上市公司的股票进行分类，便于找到具有行业相关性的公司股票。行业分析是股市基本面分析的重要一块，进行行业股票的分类便于对股票的分析研究，行业板块日渐成为选股的重要依据。

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

D. 如何下载所有股票的历史数据

下载所有股票的历史数据，以同花顺股票软件为例：
1、首先切换到要下载数据的股票K线形态，按“F1”进入“日线某某股票历史成交”；
2、点击鼠标右键->数据导出->导出所有数据->在“请选择导出的类型”中选择excel或txt,，只有这二种格式可以选择；
3、选取好后点击下一步，在“导入导出对话框模板”中选择要的项目（如最高价、最低价，开盘价等，默认是全选）；
4、点下一步，完成。默认保存路径在桌面上。

E. 哪里能找到股市板块涨跌幅的历史数据

输入“94”，回车，就能看见板块的涨幅榜，就能看见什么板块领跌。
板块涨幅的计算方法：
板块中的所有股票价格简单相加，除以总的股本简单相加，再与基准日指数对比而来。
举例来说：
假定基准日指数为100，某板块中有股票3只，价格和股本为：
a50元15亿
b30元20亿
c40元25亿
板块指数为=（50+30+40）/(15+20+25)*基准日指数=200；

F. 请问如何批量下载股票历史数据

• 1

  打开Choice金融终端，启动Excel插件

  

注意事项

• 下载中数据量庞大时，耗时可能会稍长，当然也比传统的下载要省事很多

G. 个股历史数据不全如何下载数据(通达信)

系统菜单下有一个盘后数据下载，选中后弹出数据下载对话框。选中对话框中的两个复选框，点开始下载等着就行了。

H. 怎样才能把每天股票中各个板块各个股票包括大盘的详细走势保存下来

很简单啊，收盘后，股票软件会提示你是否下载当日数据，然后你选择下载当日数据种类就可以了，至于以往数据，也可以下载历史数据就补充完整了。不过如果你随时可以在家上网看电脑，就没必要下载这些数据。

I. 我刚找了一个通达信的板块指数对比指标公式，请问怎样下载板块的历史数据

点“系统”，再点“盘后数据下载”就可以。

J. mt4下载历史数据的方法

打开自己的mt4软件,在最上面的工具栏中找到“工具”,点击之后在下拉菜单中选择历史数据中心（H）,这样就可以下载历史数据了。通过mt4下载历史数据有一个很大的缺陷,就是通过mt4软件直接下载的历史数据只能下载近期一小段时间的。如果投资人想要下载全部历史数据或者时间比较久远一点的历史数据的话,就必须要借助一些专业的复盘软件来进行查看了。