不同版本Exce导入问题！l

孤帆远影 · 发表于 2006-9-5 19:18:00

现象：Excel2003文件若干，Access2000，和Access2003

目的：导入Excel表到Access

操作：通过获取外部数据导入正常。

但是在代码中写入

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, 1000, "1000.xls"

先打开1000.xls后，执行该语句正常。

自动执行时(Excle关闭)，提示"外部表不是预期的格式"

SpreadsheetType最大到acSpreadsheetTypeExcel9，按照版本号应该是acSpreadsheetTypeExcel11

在引用中增加了"Microsoft Excel 11.0 Object Labrary" 和 "Microsoft Office 11.0 Object Labrary"

SpreadsheetType类型没有变化，问题仍然没有解决。

请高手援手！！

hxt1971 · 发表于 2008-10-4 20:38:32

[:50]

sgrshh29 · 发表于 2006-9-9 13:15:00

以下是引用孤帆远影在2006-9-5 14:10:00的发言：
这不可能，上千个文件，如果转换还不如打开后直接读入，或者直接获取外部数据

做一个循环,打开后直接读入,读入以后就关闭.可以用代码实现

[此贴子已经被作者于2006-9-9 5:19:36编辑过]

wwwwa · 发表于 2006-9-6 16:51:00

这个问题你在2006年4月13日问过，这么长的时间没有解决？既然没有直接方法，只有用间接方法。以下为示例，自己做循环取得文件名。

TRY：

Set ZX = CreateObject("excel.application")
ZX.Visible = True
ZX.Workbooks.Add
ZX.Workbooks.Open ("D:\TEMP\1000.xls")
ZX.ActiveWorkbook.SaveAs "D:\TEMP\AA.xls", 43, "", "", False, False

zx.Quit
Set zx = Nothingor　在打开EXCEL后，直接运行ACCESS查询，导入数据。

[此贴子已经被作者于2006-9-6 9:22:26编辑过]

wwwwa · 发表于 2006-9-6 16:31:00

在EXCEL2000+ACCESS2000下测试了一下，用EXCEL2000打开后，ACCESS2000才能访问XLS文件，用ADO也不行，在这种情况下，只有在ACCESS2000中调用EXCEL2000打开XLS文件，另存为EXCEL2000格式。

孤帆远影 · 发表于 2006-9-6 01:35:00

有没有人能帮忙啊

孤帆远影 · 发表于 2006-9-5 23:49:00

上一贴没传上去！

孤帆远影 · 发表于 2006-9-5 23:48:00

请各位帮忙看看！

wwwwa · 发表于 2006-9-5 23:28:00

传一个2003的文件。

孤帆远影 · 发表于 2006-9-5 22:10:00

这不可能，上千个文件，如果转换还不如打开后直接读入，或者直接获取外部数据

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

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

主题相关群

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

[宏/菜单/工具栏] 不同版本Exce导入问题！l

本帖子中包含更多资源

回复：（孤帆远影）不同版本Exce导入问题！l

本帖子中包含更多资源

回复：（孤帆远影）不同版本Exce导入问题！l

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