从Excel文本框到Access表

我试图将我的Excel工作簿连接到MS Access(ScreeningLogDatabase.accdb)中的一个表(ScreeningLogsTEST),我得到这个错误:

运行时错误“3001”:参数types错误,超出可接受的范围,或者彼此冲突

你能帮我弄清楚为什么?

Sub ADOFromExcelToAccess() Dim cn As ADODB.Connection Dim rs As ADODB.Recordset Set cn = New ADODB.Connection cn.Open "Provider=Microsoft.ACE.OLEDB.12.0; " & _ "Data Source=Q:\TOC Contract Screenings\ScreeningLogDatabase.accdb" Set rs = New ADODB.Recordset rs.Open “ScreeningLogsTEST”, ActiveConnection:=cn, CursorType:=adOpenDynamic, LockType:=adLockOptimistic