Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Saved = True '有了改变也不会提示保存
End Sub
或者:
ThisWorkbook.Save '主动保存改变,替换第二行
汗,,,有歧义啊。您是希望达到这个效果呢,还是说遇到了这个问题需要解决?
看到你的补充了
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Me.Saved = True
End Sub
注意,加了这段宏后,你关闭时,即使修改过没有保存,也不会提示的哦
祝你好运
你说的未修改是未修改宏,还是未修改数据内容?
这个很难做的!