如何用ＶＢ引导ＥＸＣＥＬ

a9508304 · 发表于 2003-12-1 11:43

我不知道如何用ＶＢ引导ＥＸＣＥＬ，我在ＶＢ中写了这么一段（
Private Sub exl()
Dim exl As Object
Set exl = createobject("excel.application")
exl.workbooks.open (App.Path & "\" & "book.xls")
exl.Visible = ture
Unload Me
End Sub），但运行出错，不知如何是好，请大侠们指点迷津。

jacklg · 发表于 2003-12-1 16:38

WHAT‘S WRONG？

doyyi · 发表于 2003-12-1 21:01

应该在TIMER控件使用这些代码！

jacklg · 发表于 2003-12-2 09:09

跟TIMER有什么关系？

liyuanjun · 发表于 2003-12-3 16:43

是不是APP.PATH 路径没定义,或定义错了.

a9508304 · 发表于 2003-12-5 17:08

谢谢大家参与，原本是有timer控件的，interval是1000。book.xls与编译的执行文件是同一目录private sub timer1_timer()
dim exl as object
set exl = createobject("excel.application")
exl.workbooks.open (app.path & "\" & "book.xls")
exl.visible = ture
unload me
end sub）
就是不执行。

a9508304 · 发表于 2003-12-8 11:28

能用什么呢

jacklg · 发表于 2003-12-8 14:34

讲了半天,也没把错误提示写明白~

sqac · 发表于 2003-12-8 22:47

我的意思是将代码放到一个按钮控件的click事件中试试。

hzg7818 · 发表于 2003-12-8 22:27

先确定在工程引用中是否引用microsoft excel x.0 library，我曾经在98中编译因未设置引用而未通过，你的代码没问题

		自动登录	找回密码
密码			免费注册

[求助] 如何用ＶＢ引导ＥＸＣＥＬ