如何利用某只股票的历年数据库

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

❷ 可以获得国内股票和期货tick级别历史数据的数据库有哪些

可以通过交易所的授权数据提供商获得国内股票和期货tick级别历史数据。
很多人喜欢做短线，觉得短线刺激，长线持股待涨这种等待实在没有办法承受，但是倘若大家不会做短线，很大概率会亏得更快。今天就把我独有的做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，最新业务变化以文中链接内展示的数据为准，请点击查看

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

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

❹ 利用股票软件如何导出某只股票的历史数据比如同花顺软件还有如何打开. 财经格式的 文件

K线图上，选 更多 ，选 指数成交明细 或者是 历史成交， 进入后，鼠标右键选择导出

❺ 如何获取股票数据与历史数据以数据库方式存储的

股票历史数据查询有个很不错的网页工具可以推荐，地址是http://tool.cnfunny.cn/#/打开就可以直接使用，还可以大批量下载，方便省事！

❻ 在哪里可以找到股票历史数据形成的数据库

大富翁数据中心提供国内股票和期货tick级别历史数据的数据库，各级别分钟数据也有，外盘也有提供，都是纯文本，质量很高

❼ 如何引用任意股票的数据

• 引用任意数据的方法请参考：
  1、常规方法不能直接引用。
  2、在许多场合下，可以通过计算间接引用，比如在其它股票中，想知道深发展的ma(c,5),可行的公式代码是：
  yyc:="000001@close";
  pyyc:=ma(yyc,5);
  3、小结：可以被间接引用的指标，必须是可以由“OPEN、HIGH、LOW、CLOSE、VOL、AMOUNT”计算的指标。其它的不行，比如想引用深发展的流通盘就不行。
  4、巧解引用任意个股其它指标A（指不能由OPEN、HIGH、LOW、CLOSE、VOL、AMOUNT”直接计算的指标）方法：
  ①用一个指标B计算所有个股的指标值，并输出到一个外部文件。
  ②设计一个指标C，从外部文件中读取所需个股的指标A的值，当然在公式代码中要判断是否符合条件的个股。
  ③如果引用时，需要考虑到动态刷新，还需做一个工作，把指标B放入预警条件中，这样指标B生成的外部文件就会实时更新，指标C引用的数值也是实时更新的。
  5、方法4说来简单，做起来不容易，需借助于VBS或DLL。此外实时刷新的话，会给系统带来很大负担。做成盘后分析的指标比较合适。
  6、方法4，适用于个股长周期引用自身的短周期数据的情况，同样也有实时和盘后的2种调用方式，当然盘后静态的引用比较适用。
  7、第6点所述问题，在飞狐实现了扩展数据库后，就直接解决了，无需使用外部文件（慢且占空间大）。

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

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

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

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

❾ 请教高手，怎样查个股的往年的市值

可以通过股票软件进行查询，步骤如下：

工具：手机

1、手机桌面找到股票软件（这里以同花顺为例）。

❿ 如何用同花顺一次性导出所有股票的历史数据excel，不是某一只股票的历史数据，也不是所有股票的当日数据；

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位。