导航:首页 > 数据行情 > 东方财富如何下载股票历史数据

东方财富如何下载股票历史数据

发布时间:2022-06-04 04:12:18

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

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

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

‘叁’ 请问如何批量下载股票历史数据

‘肆’ 东方财富网的数据能导出来吗

能导出,导出的方法有下列2种:
1、打开所需导出数据的页面,例如:龙虎榜单,选中需要导出的数据,复制,到excel或文本文件中粘贴。
2、打开excel,新建一个空白文档,点击菜单栏→数据→导入外部数据→新建Web查询→在地址中粘贴需要导入的链接(还是以龙虎榜单为例)→点击转到→单击要选择表格旁边的向右方向箭头,但后单击“导入”→选择导入数据的位置→确定。
在东方财富金融终端内所有以列表形式所展现的数据,例如:沪深股票列表;自选股列表;板块列表等等。您都可以通过鼠标右键选择“数据导出”进行导出。在导出时您也可以对导出的数据进行筛选。
目前东方财富网支持使用财富手机版软件、东方财富PC版软件进行交易,需要在东方财富证券官方网站下载PC版或手机版的行情交易软件即可完成直接购买或卖出股票。
手机版的操作方式是:
东方财富App:版本4.24.3
在用手机上打开财富手机版软件,点击首页“委托交易”登陆之后,选择东方财富证券,输入资金账号和交易密码登陆,就可以进行交易。
电脑版的操作方式是:打开东方财富终端,点击页面最上方的交易按钮,设置委托,然后下载东方财富证券证券即可进行交易;或直接在股票名字、招商银行、中国银行、农业银行、华夏银行、光大银行、浦发银行、工商银行、建设银行、平安银行、交通银行、宁波银行、广发银行在内的17家银行。

拓展资料:
东方财富的股票交易手续费为交易额的万分之二点五。股票交易手续费是进行股票交易时所支付的手续费。委托买卖的手续费分“阶段式”和“跟价式”。1阶段式:根据股票价格和交易股数收取手续费。2跟价式:根据股票的交易金额收取手续费,目前世界上多采用跟价式

‘伍’ 东方财富网怎么看股票历史单价怎么查询

入网—输代码—点查行情可看到两个图,点一次下面的日k线图会转到一个单独的日k线图,这时再点一次日k线图就会有光标出现,左右移动就可看某天的价格及成交量,这些数据显示在日k线图方框的上边。
浏览器 电脑端:macbookpro mos14打开google版本 92.0.4515.131

股票价格,是指股票在证券市场上买卖时的价格。股票本身没有价值,仅是一种凭证。其有价格的原因是它能给其持有者带来股利收入,故买卖股票实际上是购买或出售一种领取股利收入的凭证。票面价值是参与公司利润分配的基础,股利水平是一定量的股份资本与实现的股利比率,利息率是货币资本的利息率水平。股票的买卖价格,即股票行市的高低,直接取决于股息的数额与银行存款利率的高低。它直接受供求的影响,而供求又受股票市场内外诸多因素影响,从而使股票的行市背离其票面价值。
拓展资料
股票价格的分类
股票有市场价格和理论价格之分。
1.股票的市场价格
股票的市场价格即股票在股票市场上买卖的价格。股票市场可分为发行市场和流通市场,因而,股票的市场价格也就有发行价格和流通价格的区分。股票的发行价格就是发行公司与证券承销商议定的价格。股票发行价格的确定有三种情况:
(1)股票的发行价格就是股票的票面价值。
(2)股票的发行价格以股票在流通市场上的价格为基准来确定。
(3)股票的发行价格在股票面值与市场流通价格之间,通常是对原有股东有偿配股时采用这种价格。国际市场上确定股票发行价格的参考公式是:
股票发行价格=市盈率还原值×40%+股息还原率×20%+每股净值×20%+预计当年股息与一年期存款利率还原值×20%,这个公式全面地考虑了影响股票发行价格的若干因素,如利率、股息、流通市场的股票价格等,值得借鉴。股票在流通市场上的价格,才是完全意义上的股票的市场价格,一般称为股票市价或股票行市。股票市价表现为开盘价、收盘价、最高价、最低价等形式。其中收盘价最重要,是分析股市行情时采用的基本数据。
2.股票的理论价格
股票代表的是持有者的股东权。这种股东权的直接经济利益,表现为股息、红利收入。股票的理论价格,就是为获得这种股息、红利收入的请求权而付出的代价,是股息资本化的表现。
静态地看,股息收入与利息收入具有同样的意义。投资者是把资金投资于股票还是存于银行,这首先取决于哪一种投资的收益率高。按照等量资本获得等量收入的理论,如果股息率高于利息率,人们对股票的需求就会增加,股票价格就会上涨,从而股息率就会下降,一直降到股息率与市场利率大体一致为止。按照这种分析,可以得出股票的理论价格公式为:
股票理论价格=股息红利收益/市场利率
计算股票的理论价格需要考虑的因素包括:预期股息和必要收益率
(浏览器电脑端:macbookpro mos14打开google版本 92.0.4515.131 )

‘陆’ 股票历史收盘价查询的话,要下什么软件

1、查询股票历史收盘价,任意一种股票交易软件都能查询到。

比较常用的,像同花顺APP、通达信APP、东方财富证券APP、平安证券APP,或者其他证券APP也可以查询。但我建议尽量下载这些比较知名且可靠的股票交易软件。



‘柒’ 如何下载所有股票的历史数据

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

‘捌’ 东方财富网数据如何下载excel

1、首先在一个新建的Excel表格中,选择进入到数据页面中。

‘玖’ 怎样在东方财富网上查股票的历史行情啊

可以查,在东方财富输入你想要查的股票代码,按回车“enter”键,进入,再按一次回车“enter”键,进入该股票的日K线,按上下键就可以查看从上市以来该股票的涨跌情况了。

阅读全文

与东方财富如何下载股票历史数据相关的资料

热点内容
生益科技历史股票 浏览:683
怎么看股票的涨停跌停 浏览:516
中签股票什么时候破出涨停 浏览:618
深圳智慧医疗股票 浏览:589
工业大数据相关股票 浏览:647
苹果手机股票app推荐软件 浏览:400
股票配资最新体验 浏览:176
中科信息股票开盘价格 浏览:560
新行业是哪些股票代码 浏览:964
股票资金账号幸运数字 浏览:685
通过提供新闻天气股票信息收取的费用 浏览:826
中国人保股票还会涨吗 浏览:94
股票是根据公司什么情况涨停 浏览:921
在工商银行股票开户手续费怎么算 浏览:21
股票债券网 浏览:491
大股东占用资金股票 浏览:435
中国长城股票原来叫什么 浏览:233
股票资金流入多少算好 浏览:857
尤科斯石油与中国股票 浏览:821
香港和锰有关的股票 浏览:461