标题:VB6窗体中插入一个excel表格并显示数据
取消只看楼主
caonao
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2014-9-15
 问题点数:0 回复次数:4 
VB6窗体中插入一个excel表格并显示数据
请问,在VB6窗体中插入一个excel表格,制作一个命令按扭,点击命令按扭后窗体中的excel表格range("b10")的值为88这个代码怎样写,谢谢!
搜索更多相关主题的帖子: excel表格 制作 
2015-03-19 22:12
caonao
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2014-9-15
得分:0 
回复 2楼 wube
写这个问题的目的是想知道怎样激活窗体中的Excel表格,用 OLE1.DoVerb 0 '激活Excel时窗体与表格之间有个白色空白我总感到不爽,我想能否在在窗体的通用事件中加段程序让窗体中的Excel表格处于激活状态而不出现窗体与表格之间白色空白,请老师指点,谢谢!
当然添加控件用OLE1.DoVerb 0'激活Excel是很容易的:
Private Sub Command1_Click()
    OLE1.DoVerb 0'激活Excel
    OLE1.object.Parent.Cells(10, 2) = "88"
End Sub

[ 本帖最后由 caonao 于 2015-3-20 10:46 编辑 ]
2015-03-20 10:45
caonao
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2014-9-15
得分:0 
回复 4楼 wube
我运行一个按钮时,excel就被激活,此时就好像excel表格从窗体中跳了出来,形成窗体下边和右边各一条白边,也就是说窗体和表格脱节,虽然用OLE1.Refresh可以复位但总感到不爽,我想要的效果就是像MSFlexgrid控件做好表格后怎样运行其表格都不与窗体分离,形成窗体下边和右边各一条白边不知为什么,请指点,谢谢!

7.zip (65.27 KB)
2015-03-20 21:16
caonao
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2014-9-15
得分:0 
回复 6楼 wube
连接上面的網址总是出错,请上传一份代码给我好吗,谢谢!
2015-03-21 00:50
caonao
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2014-9-15
得分:0 
回复 8楼 wube
慢慢学习消化,谢谢老师的热心帮助!

[ 本帖最后由 caonao 于 2015-3-21 15:18 编辑 ]
2015-03-21 09:53



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-442835-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.063810 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved