导航:首页 > 数据行情 > 股票数据分析excel

股票数据分析excel

发布时间:2023-08-01 00:45:01

① 如何用同花顺一次性导出所有股票的历史数据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位。

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

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

③ 使用Excel进行炒股的方法

你是不是经常奔跑于各大证券机构或者购买证券类报纸,然后从一大堆数据中查询你最关心的几种股票呢?其实,你只需要在电脑上安装Excel便可查询并分析你所关心的股票,是不是感觉很新奇?下面我们就来看看具体的实现过程吧!
一、获取股票查询的链接地址
1. 能够提供股票行情查询的网站有很多,我们这里以“搜狐股票查询页面”为例进行介绍。在IE地址栏中输入网址即可打开“多股行情―搜狐股票”页面。
2. 在“股票行情查询”文本框中输入欲查询的股票代号并以逗号隔开。例如要查找中国石化、华能国际、宝钢股份以及中国联通这四支股票,那么分别输入“600028,600011,600019,600050”,最后单击“查”按钮即可在打开的页面中看到查询的结果。
3. 我们将搜索结果的页面地址复制到剪贴板中以备后面使用。
二、新建Web查询
1. 运行Excel,合并第1行和第2行,然后在其中输入“我的股票查询”,接着设置合适的字体、大小、颜色以及位置。
2. 选中A3单元格,然后依次选择“数据→导入外部数据→新建Web查询”菜单命令。
3. 在“新建Web查询”界面的“地址”栏中输入我们前面获得的查询链接地址。
4. 单击“转到”按钮,这时我们会看到刚才的股票搜索结果页面出现在该界面中,不同的是在窗口左侧出现了许多含有黑色箭头的黄色小方框,当将鼠标指向其中的一个方框并单击时,方框颜色将变为绿色并且箭头将变成“√”,我们这里只需选中并单击含有股票数据的方框即可。
5. 单击“导入”按钮,此时会出现“导入数据”界面,在此将获得的Web数据放置到“现有工作表”或者“新建工作表”中,在此我们选中现有的工作表。
6. 当单击“确定”后将会出现正在导入数据的提示,不一会便可在Excel中看到几种股票的查询结果。为了让Excel中的数据能及时的获得更新,因此我们需要选中导入的Web数据并单击鼠标右键,然后选择“数据区域属性”命令。
7. 在打开的“外部数据区域属性”界面中勾选“刷新频率”复选框,然后将刷新频率设置为“30分钟”。为了能在打开工作表时就看到最新的Web数据,我们需要勾选“打开工作簿时,自动刷新”复选框,最后单击“确定”按钮即可。
三、用图表分析表格数据
1. 在表格中选中“股票名称”、“涨跌额”和“涨跌幅”下的数据,然后单击工具栏上的“图表向导”按钮,此时将打开“图表向导”对话框。
2. 在“标准类型”选项卡的“图表类型”列表中选择股票经常使用的“折线图”,然后在“子图表类型”列表中选择“数据点折线图”。
3. 单击“下一步”按钮,在接着出现的对话框中选择“系列”选项卡,然后选中“系列”栏下的“系列1”,我们看到其值为G4:G7中的数据,此数据为“涨跌额”中的数据,因此我们在将“名称”设置为“涨跌额”,然后选中“系列2”,接着将其名称改为“涨跌幅”。
4. 单击“下一步”按钮,我们在“图表标题”下输入图表分析的标题,例如“股票分析”、“分类(X)轴”及“分类(Y)轴”分别输入“股票名称”以及“涨跌额/幅”。
5. 单击“下一步”按钮,我们选中“作为其中的对象插入”项,最后单击“完成”按钮即可看到所制作的股票分析图表。

④ 怎样用EXCEL分析股票

EXCEL全自动分析股市软件https://item.taobao.com/item.htm?id=532889729619

⑤ 如何用Excel制作股票实时行情

制作实时股票行情图,应包含如下内容:1.股票数据表,2.股价图,3.实时从网上下载数据的功能
第一步:制作数据表,数据-导入外部数-新建WEB查询 写入该数据来源地址
第二步:制作股价图,先用公式按股价图要求的顺序引用到当前表,再插入图表-选股价图(第4种)调整图表
第三步:编写程序以实现实时刷新功能,可将以下程序按其要求的位置复制过去

'在模块中编写如下程序段用于刷新行情表,"00:00:10"表示刷新时间间隔,可根据需要进行调整

Dim 结束标记
Sub 刷新行情()

Sheets("日线数据").Range("A1").QueryTable.Refresh
BackgroundQuery:=False

Sheets("分笔数据").Range("A1").QueryTable.Refresh
BackgroundQuery:=False
If 结束标记
<> 1 Then Application.OnTime Now +
TimeValue("00:00:10"), "刷新行情"
End Sub
Sub 开始刷新()
结束标记 = 0
刷新行情
End Sub
Sub 结束刷新()
结束标记 = 1
End Sub

'在thisworkbook中编写如下代码用于打开该表时就启动行情刷新

Private Sub Workbook_Open()
刷新行情
End Sub

以上制作完成,保存后打开该表,可得到实用的股票行情图,并可得到实时数据用于数据分析

⑥ 如何下载股票历史成交数据到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、这种方法要求股价数据必须按“成交量-开盘-盘高-盘低-收盘”的次序排列,各类数据占一列,不能前后颠倒,如图所示。

阅读全文

与股票数据分析excel相关的资料

热点内容
哪个股票软件有fsl指标 浏览:714
沃施股份股票今天的走势 浏览:380
股票交易的时间下午几点结束 浏览:567
300050股票走势 浏览:117
韩国股票交易时间 浏览:741
股票绑定的别的银行卡 浏览:97
今年退市的五只股票 浏览:924
股票信息都是公开的呀 浏览:427
证券股票app哪个更好 浏览:405
股票辅账户余额怎么用 浏览:411
股票买卖次数多赚钱多 浏览:323
浦发银行股票可以持有吗 浏览:447
002738的股票值得投资 浏览:385
股票投资流派哪种 浏览:785
融资买的股票变st了 浏览:858
友邦华泰盛世中国股票型证券投资基金 浏览:172
人可以开几个股票账户 浏览:35
股票卖出资金不能取 浏览:310
汉得信息股票质押情况 浏览:657
抢涨停股股票挂单时间 浏览:889