导航:首页 > 数据行情 > 如何导出某一只股票历史数据

如何导出某一只股票历史数据

发布时间:2022-04-26 02:02:50

㈠ 怎么把一只股票的历史数据导入excel

一般来讲,股票软件中的数据都可以导出为excel文件、或者txt文件。
如果能直接导出为excel文件那最好;
如果只能导出为txt文件,那么可以在excel中通过“数据”这个菜单下的导入功能、或者“自文本”功能把txt文件中的数据导入到excel文件。

㈡ 如何下载股票历史成交数据到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、打开同花顺股票交易系统,输入个股代码,在K线图界面,按F1进入历史成交,往上翻,翻到要导出数据的起始点,点鼠标右键,数据导出,导出所有数据,下一步,下一步,完成,默认保存在桌面上。
2、同花顺股票软件是一个提供行情显示、行情分析和行情交易的股票软件,它分为免费PC产品,付费PC产品,电脑平板产品,手机产品等适用性强的多个版本。同花顺股票软件注重各大证券机构、广大股民的需求和使用习惯,同花顺股票软件全新版免注册。全新版同花顺股票软件新增强大功能:自主研发的搜牛财经及自定义选股,新增通达信模式。

㈣ 同花顺怎么下载个股的所有历史数据

同花顺下载个股的所有历史数据:
1、首先切换到要下载数据的股票K线形态,按“F1”进入“日线某某股票历史成交”;
2、点击鼠标右键->数据导出->导出所有数据->在“请选择导出的类型”中选择excel或txt,,只有这二种格式可以选择;
3、选取好后点击下一步,在“导入导出对话框模板”中选择要的项目;
4、点下一步,完成。默认保存路径在桌面上。
一、同花顺软件
同花顺,是一款功能非常强大的免费网上股票证券交易分析软件,投资者炒股的必备工具。
同花顺股票软件是一个提供行情显示、行情分析和行情交易的股票软件,它分为免费PC产品,付费PC产品,电脑平板产品,手机产品等适用性强的多个版本。同花顺股票软件注重各大证券机构、广大股民的需求和使用习惯,同花顺股票软件全新版免费免注册。全新版同花顺股票软件新增强大功能:自主研发的问财选股及自定义选股,问财选股是新一代自然语言选股,解析自然语言选出股票。 新增通达信模式。
同花顺面向客户可为银行、证券、保险、基金、私募、高校、政府等行业提供智能化解决方案。正在拓展至生活、医疗、教育等更多领域。
二、同花顺业务介绍
浙江核新同花顺(300033)网络信息股份有限公司前身为上海核新软件技术有限公司,成立于2001年8月24日。为使公司有更好的发展环境,于2007年5月迁址到杭州高新区。
企业由易峥等四个自然人和上海凯士奥投资咨询有限公司共同投资组建。企业在北京、上海、深圳、成都、西安、哈尔滨设立了6家分支机构,并拥有一家全资子公司杭州核新软件技术有限公司(成立于1994年)。
公司股本5.38亿元,从业人员约4000余人,其中研发人员和技术服务人员占65%以上。
公司是专业从事互联网炒股软件的开发、提供炒股数据和财经信息服务的高新技术企业,旗下拥有同花顺金融服务网、同花顺爱基金投资网,并推出了一系列形式丰富、独具特色的创新增值服务,深受广大证券公司、股民的欢迎。

㈤ 如何查询某只股票历史某一天的市值能否导出

1、首先在自己的小米手机上打开平安证券APP后,点击右下角“我的”,如下图所示。

㈥ 国元证券股票交易软件的历史行情数据怎么导出,也就是十天以内的行情数据。所有股票的成交量,量比之类的

点击系统-导出数据-选择excel格式即可。
我们经常听到的股票成交量,就是买卖股票的成交数量,即一天之内就完成成交的股票总数量(1手=100股)
没有特殊情况时,股票成交量能体现出个股或者大盘的活跃程度,有助于我们从众多股票中选中最好的一个、识别买入和卖出的时机。
采取什么方法可以看股票成交量?有没有详细分析股票的诀窍?哪些地方是我们要留心观察的呢?下面我为大家解答这些问题。
在这之前,先给大家发福利,我整理各行业的龙头股信息,涉及医疗、新能源、白酒、军工等热门行业,随时可能被删:吐血整理!各大行业龙头股票一览表,建议收藏!
一、股票成交量怎么看?有没有详细分析股票的诀窍?
股票成交量可以通过交易软件来查看,开盘时买入卖出的数量,从而具体看准确的成交量 。或者看红绿柱,股票的成交量可以通过柱体的颜色要直接反映出来:红柱体代表买入﹥卖出;绿柱体代表买入﹤卖出。
要想股票炒得好,实用工具少不了,吐血整理的【股票研究9大神器】。点击领取:超实用炒股的九大神器,建议收藏

二、股票成交量大就一定好吗?
一只股票的好坏不是它的成交量就能决定的,只能关于这支股票的价格,说买卖双方有着非常大的分歧。
像一些热门股票,买的人认为价格会上涨,卖的人认为价格会下跌,双方分歧很大,那成交量就会很高,反之成交量就很低。
成交量和股价趋势配合起来观察是最好的:上涨趋势,成交量仍然在不断上涨,随着价格的上升,而买卖双方的分歧也是越来越强烈了,不断攀升的交易量,股票持有者在不断参与卖出,此时对于追涨方面就需要警醒了;当股票的走势是下跌时,它的成交量也会随之减少,买卖双方分歧小,未来继续下跌可能性大。
除此之外,股票成交量还有其他几种情况,受到字数限制,就不具体说了,大家可以点击下方链接,输入你中意的股票,就能免费获得个股成交量分析报告:【免费】测一测你的股票当前估值位置?

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

㈦ 怎么将股票中的数据导出到excel

1、首先在电脑桌面上打开股票软件。

㈧ 在同花顺软件中怎么导出历史数据

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

㈨ 导出股票历史换手率

对于股票换手率,把它讲透这件事很少有人能做到。80%的股民都会产生一个错误的认知,觉得换手率高就是出货的意思,其实这样的想法并不正确。换手率是股票投资中很重要的一个指标,如果你对它还有很多疑惑,很有容易陷入庄家设定的圈套当中,倘若盲目进行跟庄,损失肯定很大。

在讲股票换手率之前,先发放一波福利给大家,新鲜出炉的牛股榜单已经整理好了,利益敏感,随时有可能被删!赶紧领一下吧:【紧急】:3只牛股名单泄露,或将迎来井喷式大行情!

一、股票换手率是什么意思?怎么计算?

我们先从换手意思入手,换手呢,通常指的是商品从一个人手里买入或者是卖给另外一个人而进行的等价交易,那么股票换手率指的是在规定时间内内市场中股票转手买卖的频率,是反映股票流通性强弱的指标之一。

股票换手率可以这样计算:换手率=(成交量/当时的流通股股数)×100%

假如这么来计算,有一只股票,它有股本数现在总共是一亿,假设这只股票在某个交易日交易了两千万股,那这只股票当天的换手率就是20%。

二、股票换手率高或低说明什么情况?

从上面的内容可以了解到,股票换手率高,说明股票的流动性好;反之,如果换手率低的话,就意味着这只股票的流动性是很差的,关注的人少,成交的活跃度很低。比方说大盘银行股就不是很好换手,因为股权集中分布在机构里,真正在外面参与交易的筹码就很少,一般会在1%以下。

从整个市场的角度出发,只有不超过七分之一的股票,换手率能达到3%,因此,股票活跃程度的衡量就看这个3%了。

大家在挑选股票时,首先考虑的是比较活跃的股票,想买买不了,想卖卖不了的情况这样才不会出现。所以说,能够及时准确的获得市场信息才是关键。下面就是我常常会用到的查看股市信息办法,股市信息每时每刻都在变化,可以把握最为关键的一手情报,可以直接点击这里:【正在直播】实时解读股市行情,挖掘交易良机

三、怎么通过换手率来判断个股是否值得投资呢?

那股票换手率有最佳标准吗?是不是越大才越有利呢?

未必!还是要参考实际情况。赶快跟我学这个小技巧,从下面这张图中你能够得出一个结论--出换手率是在哪个阶段,它会教我们来如何操作。



上面有提到,看出这个3%是换手率的一个分割线,只要是低于3%的股票,我们暂时就不要进场了。要是看到换手率超过3%逐渐升高,可以判断出该只股票是有资金开始逐渐的在进入了,3%至5%这时我们可以小量购买即可。

5%至10%时,当这时股票处在很低的价位的话,从而可以判断出该只股票的上涨概率是很大的,有可能这将是迎来一个拉升阶段的开始,就可以进行补仓了。随后10%到15%,可以说是进入一个加速阶段。

在15%以上的话,就需要提防一下!要明白换手不是越高越不错,价格在高位又出现了高换手率,这时候意味着主力已经在出货了,假如你在这个时候下单,那就要准备好接盘,慢慢等慢慢熬吧。

假设你对这些一窍不通,不用担心!这个买卖点提示法宝很不错,它会主动辩别庄家动向和主力资金流向,实时建议你面对不同的变化是买入好还是卖出好,需要的戳链接:实时提示股票信号,一眼看清买卖机会

㈩ 如何把同花顺中自己的股票历史成交记录导成EXCEL格式

1、首先,新建一个工作表,选中任意一个空单元格。选择【数据】-【自网】。 2、在【新建Web查询】界面我们可以看到最左上角是地址栏。点击界面右上角的【选项】可以查看导入信息的设置,可以根据实际情况进行选择。
3、在【新建Web查询】界面的地址栏输入包含你想要股票信息的网站,然后点击【转到】按钮跳转到指定网站。
4、浏览整个页面,可以看到很多标有黄色箭头的区域,这些是可以导入的数据标识。我们选择自己想要的信息框左上角的黄色箭头。
5、点击后,黄色箭头就会变成绿色箭头,如下图。然后点击右下角的【导入】按钮。
6、在【导入数据】的对话框选择数据要存储的位置。
7、在这个界面,点击左下角的【属性】可以设置刷新频率、数据变更时如何处置等。
8、设置完上述内容后,返回【导入数据】界面并点击【确定】按钮。
9、下面数据将会自动导入,稍等片刻数据即导入完成。每隔10分钟该数据就会自动刷新。


另外。要确定自己有一个pdf文档,而且确定目的是需要将pdf文档转换为word格式,然后我们将现有文档通过迅捷pdf转换器软件打开。2.通过选择PDF转换页面功能其中的PDF文件转WORD项目拖入文件.接着在迅捷pdf转换器下方按自己的需要是否更改文件名,然而在保存类型中选择*.doc选项。.全部设置完成点击开始转换,确定自己设置好路径、更改文件名和保存类型即可.转换完成之后的word文档同样可以通过迅捷pdf转换器重新转换成一开始的pdf文档。

阅读全文

与如何导出某一只股票历史数据相关的资料

热点内容
中国长城科技股票行情查询 浏览:664
买股票的财务数据 浏览:130
股票账户出现非本人交易 浏览:75
2020年我国股票市场影响因素 浏览:951
当天卖出的股票资金可以买入其他股票吗 浏览:171
如何开盘涨停板股票 浏览:161
电子信息产业集团股票 浏览:153
中美贸易争端影响较大的股票 浏览:990
股票中资金主力对倒 浏览:114
广州环保投资集团股票行情 浏览:649
消费周期动态组合etf的股票成交量 浏览:449
谷歌公司股票历史数据 浏览:454
银行能股票开户 浏览:373
那个股票app能看小国的股票 浏览:859
学股票投资有哪些App 浏览:346
美国苹果股票上市时间 浏览:796
历年美国股票指数数据 浏览:657
日韩疫情会影响中国哪些股票 浏览:121
康普顿科技股票三季度 浏览:355
小米业绩大涨的股票 浏览:168