偏要删除么？隐藏不行么？当工作表被修改后就隐藏该工作表，然后将VBA代码设置VBA工程密码。如果不能达到目的：是所有单元格都被保护了么？换句话说，是否不解除保护就不会更改工作表了，那么可以用change事件Private Sub Worksheet_Change(ByVal Target As Range)Sheet2.DeleteThisWorkbook.SaveEnd Sub不过会有提示是否删除。
