用VB设计了一个从EXCEL调用数据的程序,第一次运行正确,但关掉VB6.0再启动运行时就出现这样的问题

参数定义类型变为variant也不行,另外,已经把进程中的EXCEL.EXE都关掉了,仍然是这样。通用段定义了DimxlAppAsExcel.ApplicationDim... 参数定义类型变为variant也不行,另外,已经把进程中的EXCEL.EXE都关掉了,仍然是这样。
通用段定义了
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Dim q As Integer
————————————————
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open("E:\VB+EXCEL\副本temp")
xlApp.Visible = True
Set xlSheet = xlBook.Worksheets(1)
q = Cells(2, 2) ------->>问题就出在这里
……后面还有些代码就省略了,程序运行到q那里就出现错误……
帮帮忙,我是菜鸟
展开
 我来答
okoklixx
2011-10-26 · TA获得超过355个赞
知道小有建树答主
回答量:116
采纳率:0%
帮助的人:109万
展开全部
1,Set xlBook = xlApp.Workbooks.Open("E:\VB+EXCEL\副本temp")
括号内应为excel文件,而不是文件夹
2,q = Cells(2, 2) ,应该是q = xlSheet.Cells(2, 2).value
我为了学习注册
2011-10-27
知道答主
回答量:3
采纳率:0%
帮助的人:5041
展开全部
不知道
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式