Docmd.TransferSpreadsheet TransferType, SpreadsheetType, TableName, FileName, HasFieldNames, Range, UseOA  

　　针对Excel，其中Range的用法如下： 

　　""（空字符串）：表示工作簿的第一个工作表； 

　　"Sheet1!A1:D10"：表示工作表Sheet1的A1到D10区域； 

　　"Sheet2!"：表示整个Sheet2工作表。

　　例如：

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

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

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