Fatal编程技术网
  • excel/
  • Excel 更改Access表中的一个单元格

Excel 更改Access表中的一个单元格

excel vba ms-access

Excel 更改Access表中的一个单元格,excel,vba,ms-access,Excel,Vba,Ms Access,该代码在ExcelVBA中运行。我在access文件中有一个名为EngDepAssignments的表，该表具有相同的名称。我试图基于另一个名为dbID的列，只更改字段列dbRequestor中的一个单元格。因此，如果dbID等于30，我想将dbRequestor和dbID@30的交集插入/更新为从excel文件中获取的名称，该文件存储在数组arrdbddashboard中 但是，当我运行代码时，在From子句中出现运行时错误“-2147217900 800040e14”：语法错误 我也不确定最

该代码在ExcelVBA中运行。我在access文件中有一个名为EngDepAssignments的表，该表具有相同的名称。我试图基于另一个名为dbID的列，只更改字段列dbRequestor中的一个单元格。因此，如果dbID等于30，我想将dbRequestor和dbID@30的交集插入/更新为从excel文件中获取的名称，该文件存储在数组arrdbddashboard中

但是，当我运行代码时，在From子句中出现运行时错误“-2147217900 800040e14”：语法错误

我也不确定最后一行是否真的会更新我想要的位置，因为我没能走那么远

可能不相关，但只是为了解释，我使用varDBRecordset.Close在对表执行其他操作后关闭记录集，因为否则我会得到一个错误，即表已经在varDBRecordset.open strSQL行打开

非常感谢你的帮助

strSQL = "SELECT dbRequestor FROM EngDepAssignments WHERE dbID = 30"
varDBRecordset.Close
varDBRecordset.Open strSQL
varDBRecordset.Fields("dbRequestor") = arrdbDashBoard(i, 3)
好吧，这很奇怪。在过去的三天里，我一直努力让它工作。现在，当我发布问题时，我在几分钟内想到了修复方法：

varDBFilePath.Execute "UPDATE EngDepAssignments SET dbRequestor = " & "'" & arrdbDashBoard(i, 3) & "'" & " WHERE dbID = " & arrdbDashBoard(i, 1)
没有发现SQL语法有任何错误。要通过记录集编辑数据，必须首先将ADO记录集的记录置于编辑模式varDBRecordset.EditMode。如果要添加新记录，请选择varDBRecordset.AddNew。然后在字段编辑之后，varDBRecordset.Update。发布更多代码-如何建立与Access的连接？如何填充数组？将示例数据显示为有问题的文本表。Open方法还需要连接参数。