摘要： 获取股票历史行情数据最方便的途径，就是直接读取股票行情软件留在你电脑中的日线数据文件。
但如果不是程序员，电脑里一般不会有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
别忘了把其中红字标示的文件名换成你想要读取的数据文件名。
上一篇：Excel新增按钮快速更改大小写的方法 下一篇：Excel密码破解超简单？防止EXCEL密码被破解的方法
相关文章
- Excel教程 Excel表格下拉列表怎么设置
Excel表格下拉列表怎么设置呢？很多用户对此还不是很清楚，小编这里就给大家带来有关Excel表格下拉列表怎么设置的回答，希望能够对大家有所帮助。......
2023-01-18
详细阅读 - Excel教程 Excel如何打印选定区域
Excel如何打印选定区域呢？很多用户对此还不是很清楚，小编这里就给大家带来有关Excel如何打印选定区域的回答，希望能够对大家有所帮助。......
2023-01-18
详细阅读Excel密码破解超简单？防止EXCEL密码被破解的方法
家是不是还以为Excel密码破解是几乎做不到的事情?但事实刚好相反，借助Excel密码破解工具，Excel密码破解只需几秒钟的事情，“excel密码忘记了怎么办”这样的问题根本就不算问题!你还相信Excel密码破解是不可能完成的任务吗?
- Excel教程 Excel怎么设置英文首字母大写
Excel怎么设置英文首字母大写？Excel中输入英文首字母大写怎么操作？当我们需要将Excel表格中的英文单词，把首字母全部大写，该怎么操作呢，怎么将Excel中英文首字母大写，Excel怎么设置英文首字母大写，下面就和小编一起来看看吧！......
2023-01-18
详细阅读 - Excel教程 Excel怎么给所有的数字加10
Excel怎么给所有的数字加10？Excel数字怎么全部加10？怎么全部加1？当我们在使用Excel时，所有的数字都少10，或者1，该怎么给所有的数字都 10、 1呢，Excel怎么给所有的数字加10，EXcel数字怎么全部加10，下面就和小编一起来看看吧！......
2023-01-18
详细阅读 - Excel教程 Excel怎么设置日期自动更新
Excel怎么设置日期自动更新？Excel怎么设置日期自动更新？当我们Excel表格中的日期需要实时更新到最新日期，该怎么设置呢，怎么将Excel表格日期自动更新到最新日期，Excel怎么设置日期自动更新，下面就和小编一起来看看吧！......
2023-01-18
详细阅读
Excel中快速求两个数之间的倍数的技巧
excel常常用来统计数据，制作报表，那大家是否知道在excel中如何求倍数呢？本文就为大家具体介绍设置方法。
