关于怎样把ExceL表自动导入到ACCESS中问题，高手进！

high180

每天都生成不同文件名的EXCEL表，现需要把生成的EXCEL表自动导入到ACCESS中，在ACCESS中怎么用代码实现呀？

aftfan

就是啊!

einstein_supeng

dim TableName as string

dim FileName as string

TableName="data"

FileName="d:\data\*.xls"

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel8, TableName,FileName, True


试试看!