项目在对应于请求SQL VBA的集合中找不到
我正在尝试使用以下代码通过excel更新数据库：
Public Sub insertNew() Sheets("Sheet1").Select strDB = "i:\Profile\Desktop\DB\Database.accdb" Set cn = New ADODB.Connection cn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & strDB & ";" & "Jet OLEDB:Database Password=password;" Set rs = New ADODB.Recordset rs.Open "Project Manager", cn, adOpenKeyset, adLockOptimistic, adCmdTable r = 2 ' the start row in the worksheet Do While Len(Range("A" & r).Formula) > 0 If Range("AD" & r) = "Yes" Then With rs .AddNew 'These fields are on the spreadsheet, transfer will be made to the database .Fields("ID") = Range("A" & r).Value .Fields("Full Name") = Range("C" & r).Value .Fields("SOEID") = Range("B" & r).Value .Fields("SMT") = Range("D" & r).Value .Fields("Manager") = Range("E" & r).Value .Update End With End If r = r + 1 ' next row Loop rs.Close Set rs = Nothing cn.Close End Sub 该错误发生在以下行：
.Fields（“Full Name”）=范围（“C”＆r）.Value
如果我将该行注释掉，那么下面的行会给出相同的错误信息。 所有这些列在表格Project Manager ，我已经检查，他们没有拼写错误等。
我从来没有见过这个错误信息，所以不知道从哪里开始解决问题，所以任何帮助将是伟大的。
我可以通过在项目pipe理器中放置[]来解决这个问题，所以这行看起来像这样：
rs.Open "[Project Manager]", cn, adOpenKeyset, adLockOptimistic, adCmdTable