主题：代码执行过程报错，请老师给看看

1、先把这句删除 Tables("项目立项基础表2").Current.Delete

2、做个具体例子发上来测试，说明测试步骤（哪行哪个列输入什么值，触发）

你这样做的目的是什么？为什么要把表的这一行删除？

一般而言，数据库里面的数据，是不应该删除，添加以后，都是要保留下来的，方便以后查看。

不需要删除，只需要标记成删除，或者隐藏起来即可。

如果确实需要删除，也应该写在项目关闭的时候，整体删除。

加上列名判断

select case e.datacol.name

    case "一审", "二审", "三审"

        '这里写你1楼的代码

End Select