Excel VBA - 需要字段但保存空白字段

Question

我添加了以下代码，以便在保存之前创建所需的字段。

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If Cells(2, 2).Value = "" Then
MsgBox "Please enter Date"
Cancel = True
End If
End Sub

但是，我们的要求是当excel文件由用户openEd时，字段应为空白。我的问题是代码不允许我第一次使用空白字段保存文件。

你能建议一个解决方法吗？我不满意MS Excel不是必填字段选项...