怎样用Excel制造股票实时行情图?
制造实时股票行情图,应包括如下内容:1.股票数据表,2.股价图,3.实时从网上下载数据的功用
第一步:制造数据表,数据-导入外部数-新建WEB查询 写入该数据来历地址(如biz.finance./company/history.php?symbol=sz000001 得下表)
第二步:制造股价图,先用公式按股价图要求的次序引用到当时表,再刺进图表-选股价图(第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
以上制造完结,保存后翻开该表,可得到有用的股票行情图,并可得到实时数据用于数据剖析