导航:首页 > 数据行情 > 怎么导入股票两年内日数据

怎么导入股票两年内日数据

发布时间:2023-01-14 07:48:02

㈠ 用spss分析股票,如何把一只股票前n个交易日的开盘价和收盘价导入spss

有两种方法:

(1)把数据存成文档文件,然后用spss的文本向导打开。

具体操作如下图:

㈡ 历史l2数据怎么导入 通达信

具体步骤如下
1、选择工具菜单中的监控剪贴板,勾选此功能。
2、复制欲添加的股票文字,可以是代码也可以是中文字,软件会自动识别并过滤掉其他文字。
3、在从剪贴板监控到对话框中选择股票点击加入到板块按钮,选择板块点击确定。
4、股票批量导入完毕

㈢ 怎么把一只股票的历史数据导入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建立炒股系统的整套方法,请看后续内容。"

㈤ 如何将新浪网上的股票行情导入到excel中并实时更新

1、首先查找股票价格表的地址。x0dx0a2、打开EXCEL表将光标置于A1,选“数据/导入外部数据/新建veb查询”,在地址栏输入股票价格表地址,“转到”,单击价格表旁黄色向右箭头,单击“导入”,即可将价格表导入EXCEL表。x0dx0a3、将EXCEL表起名,保存。x0dx0a4、光标放在新导入表格中,在“数据/导入外部数据/数据区域属性/数据控件”中,勾选“打开工作簿时自动刷新/确定”。x0dx0a4、再在目录打开保存过的EXCEL表,点击“启用自动刷新”按钮,即可根据网上最新的股票数据予以刷新。x0dx0a5、你还应进一步建立自己股票查询表,用VLOOKUP函数根据股票代码将自己的股票信息导入到查询表中,并设置收益计算等项目。x0dx0a这样,每天打开查询表,刷新,即可见到自己股票的最新信息和收益状况了。

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

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

㈦ 我想导出某只股票一年内的技术指标(RSI,MA,PSY,MACD等等。。)导入到我的文本文档里,请问怎么弄

笨办法,不过很简单,excel就可以实现。
首先把该股票1年的数据导入到excel中,大智慧就能实现。
然后将指标公式复制到excel中,就可以把1年的技术指标数值算出来。

㈧ 如何自选股票行情数据导入

以下操作环境均为windows10系统。

打开Wind后,点击”股票“”自选股监控“,然后会打开”我的自选股“窗口,此时点击右上角”设置自选“,在打开的”板块管理“窗口中,继续点击右上角”新建“”新建板块“即可创建你的自选股板块,并为你的自选股板块命名。命名完成之后,在上方工具栏中选择导入自选股的方式,有如下几种:”手工选择“,”粘贴导入“,”文件导入“。当要导入很多个股票时,”手工选择“过于麻烦,建议选择”文件导入“,将保存在txt文件中的股票代码导入即可。
自选股就是自己选择的股票,在使用炒股软件时也可以将自选股意为把自己选择好的股票添加到自己选定的自选股股行中。自选股股行可以很方便的同时看多个股票,想要看这些股票的走势时可以单击鼠标右键回到软件页面即可。每个股票交易软件中都有“自选股”这个选项,只要输入你所选择的股票的代码,相应股票的各种数据就会被软件自动生成。归入自选股之后就不用在分散寻找这支股票的不同信息。
一,选股法则之30%
这里的30%指的是投资机构持有该支流通股的总和不能低于股票市场现有流通股数量的30%。在股票市场中,想要做好中长线的投资,最重要的先决条件是对上市企业进行调研,但这种调研对于散户来说是很难。所以当有一支股票被很多家机构购买时,就相当于这些机构为我们免费提供了买这家公司股票的可行性报告。
二,选股法则之40%
这里的40%指的是该上市企业最近3年的平均毛利率不能低于40%。如果该企业每年的毛利率都很高,就说明该企业在整个行业里都有具备很明显的竞争优势。这家企业可能拥有牢靠的品牌地位,核心科技以及强大的产品定价权,也可能是出于市场垄断地位。比较高的毛利率有利于推动企业利益的持续增长。此外需要注意商业类上市公司的业务具有特殊性,所以并不适合这条法则。
摘要
打开Wind后,点击”股票“”自选股监控“,然后会打开”我的自选股“窗口,此时点击右上角”设置自选“,在打开的”板块管理“窗口中,继续点击右上角”新建“”新建板块“即可创建你的自选股板块,并为你的自选股板块命名。

㈨ 如何把股票数据导入数据库

先从菜单栏里找到数据导出(保存),导出为EXCEL,然后打开统计软件或数据库,再找到文件(数据)导入,把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位。

阅读全文

与怎么导入股票两年内日数据相关的资料

热点内容
股票资金流入看什么 浏览:805
科创50指数ETf投资哪些股票 浏览:467
林园股市最新股票 浏览:525
国务院国有资产监督管理委员会股票 浏览:132
宜信最新股票价格 浏览:144
亚盛股票走势 浏览:450
工业设计软件概念股票 浏览:971
中国股票最高的是什么股 浏览:274
如何利用股东数据分析股票 浏览:155
同济科技股票配股价 浏览:219
股票短期融资债券到期兑付是好是坏 浏览:597
股票交通银行000001 浏览:811
债券比股票 浏览:518
中国软件这个股票怎么样 浏览:545
股票里的特殊账户 浏览:426
最准确的股票数据网 浏览:30
网商银行的股票代码 浏览:393
行业互动对股票市场有什么影响 浏览:555
必需品投资组合股票行情分析 浏览:621
股票看盘重要时间点 浏览:741