如何修复Runtime Errorr 3067查询输入

Question

我正在尝试在拆分数据库的后端上导入一个Excel工作表，但是此错误使我感到复杂，该错误指出我没有任何查询作为输入，我相信我的查询格式有误，但我没有知道如何解决它。请指教。

Dim sDBFile AS String 
Dim sXLSFILE AS String 
Dim sSheet AS String 
Dim sTableName As String

sSheet1 = "BJS Commit"
sTableName1 = "tblUpdateBJS Commit"
  CurrentDb.Execute "SELECT * INTO [;DATABA-SE=" & _
  sDBFile & ";]." & sTableName1 & _
  "FROM [Excel 12.0;HDR=Yes;DATABASE=" & _
  sXLSFile & ";].[" & sSheet1 & "$];", dbFailOnError