主题：退出按钮没有反应

1、工作评价窗口是什么类型的窗口？

 

2、工作评价待处理是什么类型窗口？执行代码后窗口打开了没有？

那不可能有问题。加入msgbox，看能否弹出。

请说明测试步骤以及测试出错的结果。请说明你要达到什么效果。

因为你beforeClose写了代码，不满足这个条件自然会不能关闭。

 

If Tables("工作评价待处理_工作评价表").Current.DataRow.RowState <> DataRowState.Unchanged Then '如果当前行已经修改过
    e.Cancel = True
End If

 

不能关闭的时候偶，请点击一下【保存】

请检查你自己代码，你打开窗口的时候修改表格的值，请自行检测哪里修改了列的值。