如果单元格为空，请退出打印

Question

我的控制按钮正在打印工作表。我希望代码检查特定单元格是否有数据，如果没有，我想弹出一个消息框并退出打印功能。

Private Sub CommandButton1_Click()

If IsEmpty(Worksheets("Control").Cells(C1)) Then
    MsgBox "You must have a Project Name to print!"
    Exit Sub
End If

现在，它根本不会打印工作表，说有一个应用程序或对象定义错误

If IsEmpty(Worksheets("Control").Cells(C1)) Then

我还有10个需要单独检查的其他单元格，以便提示特定于缺失数据的消息。我怎样才能做到这一点？

Answer 1

您需要指定一个字符串文字，即带有双引号的“C1”。另外，使用.Range（“C1”）。值而不是.Cells（C1）。

Private Sub CommandButton1_Click()

If IsEmpty(Worksheets("Control").Range("C1").Value) Then
    MsgBox "You must have a Project Name to print!"
    Exit Sub
End If