excel保存工作簿时提醒指定单元格不能为空解决方案

来源:转载

在工作中有时需要把设计好的电子表格给其他用户填写,表格中的一些单元格为必填项。虽然可以通过设置颜色、批注等方式提醒用户,但仍有一些用户会忘记填写。这时可以用通过下面的宏代码,当用户在保存工作簿时进行提醒,如果指定的单元格为空则不能保存工作簿。假如工作簿中“Sheet1”表的E6单元格为必填,步骤如下:

1.按Alt+F11打开VBA编辑器,在“工程”窗口中双击“ThisWorkbook”。

2.在代码窗口中输入下列代码:

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

If Worksheets("Sheet1").Range("e6") = "" Then

MsgBox "Sheet1表的E6单元格不能为空!", , "提醒"

Worksheets("Sheet1").Activate

ActiveSheet.Range("e6").Select

Cancel = True

End If

End Sub

当Sheet1表的E6单元格为空时,无论用哪种方式(如另存为、快捷键等)保存工作簿,Excel会弹出一个对话框提醒用户并跳转到指定的单元格。

分享给朋友:
您可能感兴趣的文章:
随机阅读: