Excel2010:巧妙处理折线图表中的断裂问题

时间:2022-04-14 05:31:13 

定量分析的第一步,是获取数据。
   获取股票历史行情数据最方便的途径,就是直接读取股票行情软件留在你电脑中的日线数据文件。
   但如果不是程序员,电脑里一般不会有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

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

标签:Excel2010:巧妙处理折线图表中的断裂问题
0
投稿

猜你喜欢

  • word 字母之间的间距突然变大了是怎么回事?

    2023-07-29 16:46:52
  • iOS 14 小组件使用技巧

    2023-10-26 23:01:43
  • word撤销功能无法使用怎么办?

    2023-11-29 15:09:13
  • Word如何让文字自动适应单元格大小

    2022-08-21 19:59:07
  • word如何画角平分线?word制作角平分线教程

    2023-03-26 19:21:23
  • word冻结某一行怎么设置

    2023-02-26 19:43:02
  • Word 2007 中如何让图片自动编号

    2022-11-20 23:12:56
  • Word表格怎么快速制作棋盘样式?

    2023-02-15 07:17:31
  • word 如何生成目录和页码

    2023-02-03 07:09:00
  • win10usb键盘失灵

    2023-11-09 14:00:03
  • Word文档里的字体是怎么倒过来的?

    2023-12-03 20:29:28
  • 在Word2013中获取屏幕截图的方法

    2023-12-10 06:18:58
  • Excel表格中vba宏帮助你按条件拆分两个单元格中的数字

    2023-12-14 06:39:13
  • Word中查找和替换快捷键

    2022-02-19 04:42:03
  • Word动画教程:Word2003中公式编辑器的使用方法

    2023-12-10 23:38:22
  • 如何在Word图片上添加文字的方法

    2023-09-24 08:09:51
  • word如何取消分隔符

    2022-02-05 01:07:16
  • 福昕阅读器怎么设置禁止缩放pdf页面比例?

    2023-07-14 22:43:59
  • 怎样显示Word2013文档中的裁剪标记

    2023-12-12 20:51:16
  • Word2010插入软件自带的kg公斤符号的方法教学

    2022-06-05 18:23:51
  • asp之家 电脑教程 m.aspxhome.com