读取网易股票历史数据

⑴ 如何用Excel获取网易财经最近四个季度的个股历史数据，并能自动更新

可以参考这个教程，用Excel自动获取网站数据，并能自动刷新或手动刷新
http://jingyan..com/article/c45ad29c3c5d2f051753e2d3.html

⑵ 股票软件如何查看历史K线图,下载了历史数据怎么打开

以大智慧软件为例，一般按 F5 进入日K线界面，想看比较长时间的走势，可以按 ↓ 键；如果还不能看到希望的资料，可以按 Ctrl 和 ← 键，将画面向左移；有的软件支持鼠标拖动，用鼠标点住数据直接拖就行了。
看股票K线是炒股时惯用的一种手法。利用K线找“规律”也是炒股常用的方法，毕竟股市变化多端，才能更好地指导投资决策，攫取收益。
下面跟大家来详细说明一下什么是K线，教朋友们自己怎么去分析。
分享之前，先免费送给大家几个炒股神器，能帮你收集分析数据、估值、了解最新资讯等等，都是我常用的实用工具，建议收藏：炒股的九大神器免费领取（附分享码）
一、 股票K线是什么意思？
K线图还有许多其他的叫法，如蜡烛图、日本线、阴阳线等，它本来是要用来表现米价每天的变化的，之后股票、期货、期权等证券市场都能运用到它。
由影线和实体组成的柱状线条叫k线。影线在实体上方的部分叫上影线,下方的部分叫下影线，实体分阳线和阴线。
Ps：影线代表的是当天交易的最高和最低价，实体表示的是当天的开盘价和收盘价。
阳线的表示方法很多，最常用的有红色、白色柱体还有黑框空心，而常见的阴线表示方法是用绿色、黑色或者蓝色实体柱。

除了讲的这些以外，“十字线”被我们看到时，就可以认为一条线是实体部分改变后的形态。
其实十字线是很容易理解的，可以通过十字线看出收盘价等于开盘价。
将K线研究透，我们可以敏锐地找出买卖点（虽然股市无法预测，但K线仍有一定的指导意义），对于新手来说最好掌握。
这里大家应该值得注意的是，K线分析起来是比较难的，如果你刚开始炒股，K线也不了解，建议用一些辅助工具来帮你判断一只股票是否值得买。
比如说下面的诊股链接，输入你中意的股票代码，就能自动帮你估值、分析大盘形势等等，我刚开始炒股的时候就用这种方法来过渡，非常方便：【免费】测一测你的股票当前估值位置？
接下来我就给大家讲几个对于K线进行分析的小妙招，帮助你入门这个阶段抓紧过去。
二、怎么用股票K线进行技术分析？
1、实体线为阴线
这个时候主要关注的就是股票成交量如何，成交量不大的话，就意味着股价很有可能会短期下降；而成交量很大，那多半股价要长期下跌了。
2、实体线为阳线
实体线为阳线就意味着股价上涨动力更足，至于是否是长期上涨，还是需要结合一些其他指标进行判断。
比如说大盘形式、行业前景、估值等等因素/指标，但是由于篇幅问题，不能展开细讲，大家可以点击下方链接了解：新手小白必备的股市基础知识大全

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

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

⑷ 如何查询股票的历史股价

在股票交易系统中，输入个股代码或简称，按快捷键F10即可查看股票的行情了，其中会有股票的历史数据，比如上市时间、发行价格等数据信息。或者，到一些证券公司网站上查看也可以。

股票是股份公司发行的所有权凭证，是股份公司为筹集资金而发行给各个股东作为持股凭证并借以取得股息和红利的一种有价证券。每股股票都代表股东对企业拥有一个基本单位的所有权。每支股票背后都有一家上市公司。同时，每家上市公司都会发行股票的。

在当代国际贸易迅速发展的潮流中，汇率对一国经济的影响越来越大。

任何一国的经济都在不同的程度上受汇率变动的影响，而且，汇率变动对一国经济的影响程度取决于该国的对外开放度程度，随着各国开放度的不断提高，股市受汇率的影响也日益扩大。

但最直接的是对进出口贸易的影响，本国货币升值受益的多半是进口业，亦即依赖海外供给原料的企业；相反的，出口业由于竞争力降低，而导致亏损。

可是当本国货币贬值时，情形恰恰相反。但不论是升值或是贬值，对公司业绩以及经济局势的影响，都各有利弊，所以，不能单凭汇率的升降而买入或卖出股票，这样做就会过于简单化。

汇率变动对股价的影响，最直接的是那些从事进出口贸易的公司的股票。它通过对公司营业及利润的影响，进而反映在股价上，其主要表现是：

⑴若公司的产品相当部分销售海外市场，当汇率提高时，则产品在海外市场的竞争力受到削弱，公司盈利情况下降，股票价格下跌。

⑵若公司的某些原料依赖进口，产品主要在国内销售，那么汇率提高，使公司进口原料成本降低，盈利上升，从而使公司的股价趋于上涨。

⑶如果预测到某国汇率将要上涨，那么货币资金就会向上升转移，而其中部分资金将进入股市，股票行情也可能因此而上涨。

因此，投资者可根据汇率变动对股价的上述一般影响，并参考其它因素的变化进行正确的投资选择。

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

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

2、打开我的界面后，点击“交易订单”选项，如下图所示。

3、打开我的订单界面后，点击“股票订单”选项，如下图所示。

4、这时就进入股票订单界面后，即可查询股票历史订单了，如下图所示就完成了。

⑹ 网易2012年发放每股股票的红利

从英为财情网易股票股息历史数据看，可查的最早数据是2013年1月11日的

⑺ 网易公司股票价格最低时是多少最高时是多少现在是多少

2001年前8个月网易的股价持续低迷，到2001年9月，网易因财报问题被纳斯达克停牌，整整5个月网易的股价一直处于历史最低0.64美元，其中四个月交易量为0股。 2002年网易从停牌危机中走出加上2002年第二季度网易实现盈利，网易的股价开始回升，到2003年9月网易的股价达到历史最高55.86美元，2003年10月网易的股票交易量也达到历史最高14243.61万股，而2004年网易的股价起伏比较明显，交易量呈下滑趋势。 [key]

从2000 -2004年各月网易股票走势上看，2001年和2002年网易的股价走势都比较平缓，而2003年网易的股价走势就相对起伏较大，总体而言前九个月股价处于上升趋势，之后开始下滑，2004年网易股价起伏更明显，基本上在30-60美元之间徘徊。 [key]

2001年到2002年底网易股票交易量一直不大，期间又因为停牌时间有4个月没有交易量，2003年网易的交易量才开始渐渐增加，2003年10月网易的交易量达到历史最高14243.61万股，之后开始下滑，2004年网易股票交易量起伏较大，且总体趋势为交易量正逐渐减少。[key]

从2002-2004年网易各季度的净营收额变化上看，网易的净营收额是逐年递增的，而且2002年前三季度的增长尤为显着，增长率为93.3%，到2004年第四季度网易的净营收额已经达到3160万美元。 [key]

2000年、2001年网易净亏损分别为2040、2820万美元，2002年网易实现盈利，2002-2004年净利润分别为197、3902和5330万美元。 [key]

从2002-2004各季度网易净亏损/利润情况上看，2002年第二季度网易首次实现盈利，但净利润仅为1万美元，随后的一季度网易再次亏损，直到2002年第四季度，网易才算实现了其真正意义上的盈利，当季度共盈利520万美元，之后网易各季度持续盈利，到2004年第四季度网易实现盈利1570万美元。 [key]

从2002年到2004年，网易的毛利是持续增长的，毛利率2002年第一季度到2003年第三季度为增长，之后略有下降，到2004年第四季度网易的毛利/毛利率分别达到2510万美元和79.4%。 [key]

从网易2003、2004年各季度总收入呈上升趋势，网络广告收入所占的比例基本保持稳定，网络游戏的收入所占比例正逐季增加，而其他收入所占比例正逐季减少， 2003年前两个季度网易的其他收入（主要是无线服务收入）几乎占了网易整季度收入的60%，是网易最主要的收入来源，但从2003年第三季度开始，网易的其他收入所占比例开始下滑，其主要原因是网易无线服务收入大幅度的减少，而网络游戏收入比例逐渐增加，甚至从2004年第一季度开始网络游戏收入已占总收入的50%以上，成为网易主要盈利点。 [key]

从历年网易网络广告收入变化上看，除了2001年网易为了财报问题导致其整年业务情况不佳外，网易网络广告业务还是基本保持一个持续增长的发展态势，尤其在网络经济复苏的2003年，网易的网络广告业务收入 达到了1023万美元，增长率为147.7%，2004年的广告收入为1860万美元。 [key]

从2003年、2004年各季度季度网易的网络广告收入情况看，网易的网络广告收入整体走势是逐季增加，2004年第四季度广告收入为490万美元，比上一季度减少12.5%，下降一部分是由于季节性因素，另一原因是公司一些主要广告商的全年市场预算已经在奥运会和暑假期间用掉绝大部分。 [key]

从2002-2004年各季度网易现金和持有至到期投资额情况看，2003年第三季度网易的现金和持有至到期投资额大幅度的增加，其主要是由于网易公司在2003年7月份发行了1亿美元零利息可转换次级票据，随后网易的现金和持有至到期投资额稳步增长，到2004年第四季度已达到27660万美元。 [key]

网易2004年的投资方向还是在已推出网络游戏方面，象大话西游Ⅱ，梦幻西游，精灵Ⅱ等，另外网易在房地产、电子邮件和搜索引擎方面也加大了投资力度。 [key]

⑻ 想问怎样查找股票的历史市盈率数据

查找股票的历史市盈率数据，股票市盈率常被股民用来评估股价水平是否合理，因为市盈率是个实时变动的值，所以，投资者需要知道怎么查找股票的历史市盈率数据：1、登录正规股票软件或官网；2、输入股票代码，选择市盈率即可查询。需要提醒的是，股票是一种风险较高的投资，入市需要谨慎，股票的历史数据也仅供参考，并不能提供准确的行情预测。
市盈率是某种股票每股市价与每股盈利的比率。市场广泛谈及市盈率通常指的是静态市盈率，通常用来作为比较不同价格的股票是否被高估或者低估的指标。用市盈率衡量一家公司股票的质地时，并非总是准确的。一般认为，如果一家公司股票的市盈率过高，那么该股票的价格具有泡沫，价值被高估。当一家公司增长迅速以及未来的业绩增长非常看好时，利用市盈率比较不同股票的投资价值时，这些股票必须属于同一个行业，因为此时公司的每股收益比较接近，相互比较才有效。
更多关于怎样查找股票的历史市盈率数据，进入：https://m.abcgonglue.com/ask/78278a1615757150.html?zd查看更多内容