① 怎样用Excel看股票如何看股票
推荐个非常好用的工具——腾讯文档,我现在看股票实时信息就是用的这个,它们的在线表格有个“股票动态函数”,非常好用!简单、无需学习、数据实时自动更新;看看我日常看的股票表:
② 如何用Excel看股票
Excel可以利用VBA编写程序,较好地实现看股票的功能。这里介绍一种简易的方法。
软件版本:Office2007
方法如下:
1.点击“数据”选项卡中的“自网站”:
③ 怎样用excel看股票行情 excelhome
1.首先,新建一个工作表,选中任意一个空单元格。选择【数据】-【自网站】。
④ 如何制作一个实时统计股票的excel,求高手指点
打开excel软件,第一行输入名称,然后进行合并居中。
第二行输入下图图例中各项数值的名称。
至此准备工作已基本完成。
⑤ 如何将股票价格实时更新链接到EXCEL表里
楼主试试腾讯文档在线表格吧,我现在看股票实时信息就是用的这个。它们的在线表格有个“股票动态函数”,非常好用!简单、无需学习、数据实时自动更新;看看我日常看的股票表:
⑥ 怎样用EXCEL 实时读取 股票日线数据
定量分析的第一步,是获取数据。
获取股票历史行情数据最方便的途径,就是直接读取股票行情软件留在你电脑中的日线数据文件。
但如果不是程序员,电脑里一般不会有VB、VC之类的编程语言。
其实,大家的电脑中一般都有OFFICE。OFFICE中的EXCEL自带了一个VBA语言的编程环境。功能也很强大。
我用EXCEL里的VBA编写了一段代码,读取通达信股票行情软件的日线文件。已经测试通过。
代码如下。与爱好定量分析的朋友分享。
TypeMyType
a1AsLong'标示码
a2AsLong'日期
a3AsSingle'开盘价
a4AsSingle'最高价
a5AsSingle'最低价
a6AsSingle'收盘价
a7AsSingle'成交金额
a8AsLong'成交量
EndType
Sub按钮1_Click()
DimFile2AsInteger
DimbAsMyType
File1=FreeFile
Opensh600000.dayForBinaryAccessReadAs#File1i=1DoWhileNotEOF(File1)
Get#File1,,b
Cells(i,1)=b.a1
Cells(i,2)=b.a2
Cells(i,3)=b.a3
Cells(i,4)=b.a4
Cells(i,5)=b.a5
Cells(i,6)=b.a6
⑦ 如何用EXCEL表格看股票行情
1、首先,新建一个工作表,选中任意一个空单元格。选择【数据】-【自网站】。
⑧ 怎样用excel 实时读取 股票日线数据
定量分析的第一步,是获取数据。
获取股票历史行情数据最方便的途径,就是直接读取股票行情软件留在你电脑中的日线数据文件。
但如果不是程序员,电脑里一般不会有VB、VC之类的编程语言。
其实,大家的电脑中一般都有OFFICE。OFFICE中的EXCEL自带了一个VBA语言的编程环境。功能也很强大。
我用EXCEL里的VBA编写了一段代码,读取通达信股票行情软件的日线文件。已经测试通过。
代码如下。与爱好定量分析的朋友分享。
TypeMyType
a1AsLong'标示码
a2AsLong'日期
a3AsSingle'开盘价
a4AsSingle'最高价
a5AsSingle'最低价
a6AsSingle'收盘价
a7AsSingle'成交金额
a8AsLong'成交量
EndType
Sub按钮1_Click()
DimFile2AsInteger
DimbAsMyType
File1=FreeFile
Opensh600000.dayForBinaryAccessReadAs#File1i=1DoWhileNotEOF(File1)
Get#File1,,b
Cells(i,1)=b.a1
Cells(i,2)=b.a2
Cells(i,3)=b.a3
Cells(i,4)=b.a4
Cells(i,5)=b.a5
Cells(i,6)=b.a6
⑨ 有没有可以在excel上自动显示股票实时数据的方法
当然有,直接跟网页上的数据同步就行了,excel可以从网站抓数据的。
⑩ 如何用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
以上制作完成,保存后打开该表,可得到实用的股票行情图,并可得到实时数据用于数据分析