VBA SQL操作Microsoft List时INSERT INTO报错：MyOrder字段无法更新

问题描述 #

操作Microsoft List时，SELECT和UPDATE部分字段正常，但执行INSERT INTO操作失败。VBA代码如下：

Sub SPListPushData()
    
    Const SiteUrl As String = "https://myperfectwebsite"
    Const ListName As String = "{123456789}"
    Dim Conn As New ADODB.Connection
    Dim rs As ADODB.Recordset
    Dim sql As String
    
    Conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;WSS;IMEX=2;RetrieveIds=Yes;" & "DATABASE=" & SiteUrl & ";" & "LIST=" & ListName & ";"
    Conn.Open
    
    sql = "INSERT INTO [" & ListName & "] ([MyOrder],[Comment]) VALUES ('12345','Test')"
    Set rs = New ADODB.Recordset
    rs.Open sql, Conn, adOpenDynamic
    
    rs.Close
    Conn.Close
    
End Sub

报错信息：

Execution error -2147217887 (80040e21): field MyOrder is not a field which could be updated

补充疑问：是否是因为连接字符串使用了Microsoft.ACE.OLEDB？我看到它是只读方式，但奇怪的是我的UPDATE操作可以正常执行。

问题分析与解决 #

1. 连接字符串IMEX参数的影响 #

你的连接字符串设置了IMEX=2，该参数用于强制驱动以读写模式处理混合数据类型字段，但执行INSERT时，驱动可能误判MyOrder字段的可写性——UPDATE能正常执行是因为驱动对已有记录的字段权限判断逻辑不同。

建议将IMEX=2改为IMEX=0（默认读写模式，仅遇无法识别字段类型时切换），或直接移除IMEX参数后重试。

2. MyOrder字段属性检查 #

• 确认MyOrder是否为系统字段（如内置排序字段）、计算字段、查找字段，或是设置了禁止编辑的字段——这类字段通常不允许直接通过INSERT写入。
• 检查字段数据类型匹配性：如果MyOrder是数字类型，INSERT时不要加单引号，直接传入数值12345即可。

3. INSERT语句执行方式优化 #

使用ADODB.Recordset.Open执行INSERT并不合适，Recordset更适配查询类操作。执行数据变更语句应改用ADODB.Connection.Execute方法，可避免Recordset的额外限制，修改后代码如下：

' 替换原rs.Open相关代码
Conn.Execute sql
' 无需创建Recordset，直接通过连接对象执行语句

关于ACE.OLEDB驱动的读写能力 #

ACE.OLEDB驱动并非只读，它支持对Microsoft List的读写操作，你的正常UPDATE操作也验证了这一点，问题根源不在驱动本身，而是参数设置、字段属性或执行方式的问题。

内容的提问来源于stack exchange，提问作者user1833903