您的位置: 主页 > Excel教程 > Excel基础 >

Excel2010教程之巧妙处理折线图表中的断裂问题

时间:2014-10-09 20:47 来源:Word教程网 阅读:报告错误

定量分析的第一步,是获取数据。
获取股票历史行情数据最方便的途径,就是直接读取股票行情软件留在你电脑中的日线数据文件。
但如果不是程序员,,电脑里一般不会有VB、VC之类的编程语言。
怎么办呢?
其实,大家的电脑中一般都有OFFICE。OFFICE中的Excel自带了一个VBA语言的编程环境。功能也很强大。
我用EXCEL里的VBA编写了一段代码,读取通达信股票行情软件的日线文件。已经测试通过。
代码如下。与爱好定量分析的朋友分享。

复制代码

代码如下:


Type MyType
a1 As Long '标示码
a2 As Long '日期
a3 As Single '开盘价
a4 As Single '最高价
a5 As Single '最低价
a6 As Single '收盘价
a7 As Single '成交金额
a8 As Long '成交量
End Type
Sub 按钮1_Click()
Dim File2 As Integer
Dim b As MyType
File1 = FreeFile
Open "sh600000.day" For Binary access Read As #File1
i = 1
Do While Not EOF(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
Cells(i, 7) = b.a7
Cells(i, 8) = b.a8
i = i + 1
Loop
Close #File1
End Sub


别忘了把其中红字标示的文件名换成你想要读取的数据文件名。

    最新评论

    • 昵称:
    • 验证码:点击我更换图片
    • Word

    • Excel

    • PowerPoint

    Word2003视频教程

    Word2003视频教程

    《全集共50课》分别有基础入门和高级两部教程,让你从零开始学起,从菜鸟变成高手[详情]

    Word2007视频教程

    Word2007视频教程

    《全集共43课》从Word发展历史到文档操作应用到打印,教程风趣幽默通俗易懂[详情]

    Word2010视频教程

    Word2010视频教程

    《全集共47课》由微软官方提供的视频教程,详细讲解了Word2010的新功能[详情]

    Excel2003视频教程

    Excel2003视频教程

    《全集共65课》详细讲解了Excel表格的基础操作与图表、图形、数据、打印等[详情]

    Excel2007视频教程

    Excel2007视频教程

    《全集共36课》从Excel的初步了解到表格透视图表制作和函数公式应用[详情]

    Excel2010视频教程

    Excel2010视频教程

    《全集共22课》Excel2010最新功能介绍和使用,还在不断更新,尽情关注[详情]

    PowerPoint2003视频教程

    PowerPoint2003视频教程

    《全集共22课》PowerPoint软件的介绍和应用每篇都讲解了多个功能的使用[详情]

    PowerPoint2007视频教程

    PowerPoint2007视频教程

    《全集共29课》不会制作幻灯片不用担心,本篇视频教程详细讲解幻灯片制作和动画制作[详情]

    PowerPoint2010视频教程

    PowerPoint2010视频教程

    《全集共29课》新版本的PPT中增添了许多意想不到的功能,让你设计幻灯片时更加轻松[详情]

    Word教程网-最近更新-网站地图-RSS地图-意见反馈 - 粤ICP备14012962号-3