求助在ACCESS中打开EXCEL工作表语句

付谦 · 发表于 2006-10-10 07:48:00

sgrshh29 · 发表于 2006-10-10 18:38:00

无需引用excel

Dim xlapp As Object
Set xlapp = CreateObject("Excel.Application")
xlapp.Workbooks.Open ("指定路径的.xls文件名")
xlapp.Application.Visible = True

[此贴子已经被作者于2006-10-10 11:30:04编辑过]

fan0217 · 发表于 2006-10-10 18:57:00

需要引用Excle对象。

Dim xlApp As New Excel.Application
Dim strXlsFile As String
strXlsFile = "C:\tmp.xls"
xlApp.Workbooks.Open (strXlsFile)
xlApp.Visible = True

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[与其它组件] 求助在ACCESS中打开EXCEL工作表语句

群介绍
主题无相 (随机显示版	同地区群块其他地区)