主题：“不存在名为XX的列” 的错误提示

1、把bin文件夹删除，重新打开；

2、如果还报错，把代码注释掉是否还报错？

加入这两段代码看看

msgbox(Tables("销售合同审批单明细").Cols.contains("媒体ID"))
Dim str As String = ""
For Each c As Col In Tables("销售合同审批单明细").Cols
    str &= c.name & c.visible & " | "
Next
msgbox(str)