现在需要把excel文件中的内容导入的access数据中,使用dao打开的,但是当执行下面语句时:Set db = OpenDatabase(sExcelPath, True, False, "Excel 5.0"),提示 外部数据表不是预期的格式。其中sexcelpath是要打开的Excel文件,该文件用excel可以正常打开,请高手指点是什么原因造成的。整个代码如下:
Dim db As Database
Dim rs As Recordset
Set db = OpenDatabase(sExcelPath, True, False, "Excel 5.0")
db.Execute("Select * into [;database=" & sAccessDBPath & "]." & sAccessTable & " FROM [" & sSheetName & "$]")
Dim db As Database
Dim rs As Recordset
Set db = OpenDatabase(sExcelPath, True, False, "Excel 5.0")
db.Execute("Select * into [;database=" & sAccessDBPath & "]." & sAccessTable & " FROM [" & sSheetName & "$]")
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货