Excel满足一定条件后才能保存，否则无法保存

1、新建一个Excel表格，然后右击工作表，选择查看代码

2、或同时按Alt+F11，打开VBE编辑器

3、双击ThisWorkbook，输入以下代码：Private Sub Workbook_Be酆璁冻嘌foreSave(B烤恤鹇灭yVal SaveAsUI As Boolean, Cancel As Boolean) For i = 1 To 65536 If (Cells(i, 1) <> "" And Cells(i, 2) = "") Or (Cells(i, 1) = "" And Cells(i, 2) <> "") Then MsgBox "AB列同一行不同时为空或有数据,不能保存！" Cancel = True Exit Sub End If NextEnd Sub

4、当条件不符合时，点击保存会出现弹窗提示"AB列同一行不同时为空或同时有数据,不能保存！"