| 查看: 973 | 回复: 2 | |||
[交流]
【求助】利用vb把excel里面的数据实时显示出来 已有2人参与
|
|
那位仁兄学过VB,帮忙看一下这个能不能编： 利用vb编写一个界面，把excel里面的数据实时显示出来 主要实现： 1、excel里面的数据每5秒刷新一次，所以在编写读取的时候要实时更新显示的内容（excel的刷新不在编写的考虑范围内，它相当于一个动态的数据库）； 2、编译完成后是一个直接就运行的工程文件（界面显示）。  |
回复此楼» 猜你喜欢
售SCI一区文章，我:8.O.551.O.5.4,科目全,可伽急
已经有8人回复
-
售SCI一区T0P文章，我:8O.55.1.O.5.4,科目齐全,可+急
已经有8人回复
-
售SCI一区文章，我:8.O.551.O.5.4,科目全,可伽急
已经有9人回复
-
找导师
已经有8人回复
-
售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急
已经有5人回复
-
售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急
已经有9人回复
-
面上没中，邀请各位路过的虫友分析一下分数
已经有3人回复
-
售一区SCI文章T0P，我:8O.551.O54,科目全,可十急
已经有8人回复
-
售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急
已经有11人回复
-
售SCI一区文章，我:8.O.551.O.5.4,科目全,可伽急
已经有6人回复
★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
余泽成(金币+2):辛苦了！ 2010-08-17 14:50:22
小木虫(金币+0.5):给个红包，谢谢回帖交流
余泽成(金币+2):辛苦了！ 2010-08-17 14:50:22
|
1. 先在VB工程里加入MS Excel的引用 2. 然后定义WithEvents WorkSheet As Excel.WorkSheet 3. 然后在worksheet的change事件里面更新数据就可以了 参考下面的 'Form1上有一个Label1 Option Explicit Private WithEvents WorkSheet As Excel.WorkSheet Dim Application As Excel.Application Private Sub Form_Load() Set Application = New Excel.Application '打开新的excel Application.Visible = True '显示之 Application.Workbooks.Add '加入新的工作簿 Set WorkSheet = Application.ActiveSheet '获取活动的工作表 End Sub Private Sub WorkSheet_Change(ByVal Target As Excel.Range) '工作表的change事件 Label1.Caption = Target.Cells(1, 1) '把新的内容显示到Label1上 End Sub |
2楼2010-08-17 12:45:18
谢谢你的回复
 |
3楼2010-08-17 14:29:14
20