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

你需要指定一个字符串文字，即＆＃34; C1＆＃34;双引号。另外，使用.Range（＆＃34; C1＆＃34;）。而不是.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

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

1 个答案: