excel表格如何保存空表

1.自己提供的是空的电子表格,如何要求别人不留空的单元格时,才能正

在VBA编辑器的“ThisWorkbook”中插入下面代码：

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

If Application.WorksheetFunction.CountBlank(Sheet1.Range("a1:a10")) >0 Then

MsgBox "单元格A1:A10有空，请填写完整再保存，本次保存取消！"， vbOKOnly + vbCritical， "取消保存"

Cancel = True

End If

End Sub