如题所述
怎么加啊,不会啊
你是什么版本的Office?
2003
按Alt+F11在代码窗口中拷贝下列语句进去Private Sub Workbook_BeforeClose(Cancel As Boolean)Cancel = TrueMsgBox "现在不能关闭"End Sub保存不过这样这个表就永远关不掉了咯,在你的电脑上也一样。。谨慎哦