TransferSpreadsheet如何导入excels中第二个表

[yrlxm]

参数中没有指定表选项参数.

[OracleRoob]

--从Excel中获取数据
SELECT * from [Excel 8.0;Database=D:\Test.xls].[Sheet1$]


--生成Excel数据
SELECT * into [Excel 8.0;Database=D:\Test1.xls].Sheet1 from 表名


--从txt文件中获取数据
select *
from [text;database=d:\;hdr=no].test.txt

[OracleRoob]

将Book1的Sheet1和Sheet2用TransferSpreadsheet方法导入Access mdb中。

Docmd.TransferSpreadsheet acImport, , "temp1", "C:\Book1.xls", False, "Sheet1!"
Docmd.TransferSpreadsheet acImport, , "temp2", "C:\Book1.xls", False, "Sheet2!"

[OracleRoob]

将Book1的Sheet1和Sheet2用TransferSpreadsheet方法导入Access mdb中。

Docmd.TransferSpreadsheet acImport, , "表1", "C:\Book1.xls", False, "Sheet1!"
Docmd.TransferSpreadsheet acImport, , "表2", "C:\Book1.xls", False, "Sheet2!"

--或

Docmd.TransferSpreadsheet acImport, , "表1", "C:\Book1.xls", False, "Sheet1$"
Docmd.TransferSpreadsheet acImport, , "表2", "C:\Book1.xls", False, "Sheet2$"

[WWWWA]

用
Docmd.TransferSpreadsheet acImport, , "TT", "D:\Book1.xls", False, "Sheet1$"
OR
SELECT * FROM [EXCEL 8.0;DATABASE=D:\123.XLS].[SHEET1$]

[yrlxm]

如果要同时指定表 和表中 单元格范围？
如sheet1 中A1:F4

[OracleRoob]

不能指定单元格范围。

可以在导入后，用select语句限定你要的数据。

如：


select top 4 f1,f2,f2,f4,f5,f6,f7
from 表名

[OracleRoob]

不能指定单元格范围。

可以在导入后，用select语句限定你要的数据。

如：


select top 4 f1,f2,f2,f4,f5,f6,f7
from 表名


top 4表示前4行

f1,f2,f2,f4,f5,f6,f7 表示前7个字段名

[coralli]

TransferSpreadsheet的语法：
Docmd.TransferSpreadsheet TransferType, SpreadsheetType, TableName, FileName, HasFieldNames, Range, UseOA


将Book1的Sheet1中的的A1到D10区域(含字段名)用TransferSpreadsheet方法导入Access的temp1表中：
Docmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "temp1", "C:\Book1.xls", True, "Sheet1!A1:D10"