查找行号，检查该行中的特定列是否为空

我有一系列作为我们各种机器的小时数据日志的工作簿。 操作员每小时input一次数据，然后单击一个checkbox，将数据传输到单独的工作簿。 有时，操作员不pipe出于什么原因都不会点击该框，所以我正在寻找一种方法来检查前一个框是否已被检查; 如果没有，则有一个特定的细胞被填充。 如果有，工作簿会自动选中该框并提交该行的数据。

所以我从这开始：

Private Sub CheckBox03_Click() If CheckBox03.Value = True Then If CheckBox02.Value = False Then If MsgBox("The previous hour has not yet been completed. Continue?", vbYesNo, "User Input") = vbNo Then CheckBox03.Value = False Exit Sub Else End If Else End If Call errorCheck(sht1.CheckBox03, sht1.ComboBox03) End If 

所以我已经检查了上一个checkbox，看它是否被点击，并且有时机器没有运行，所以没有数据需要input。 棘手的部分是检查该行中的特定单元格是否被填充。 如果需要添加数据，用户可以为每个小时事务添加额外的行，所以我没有设置行来查找。 我需要确定checkbox所在的行，然后查看是否填充了“J”列。

我有这些潜艇24，每小时一个，我知道这可能有点不雅…但我可以在每个电子表格中使用这个相同的代码，这是很好的。 所以如果有人能帮我解决这个问题，甚至可以改进现有的代码，我将不胜感激。 谢谢！

Answer 1

我不会很早地理解你想要什么，但可能会调用过程，而不是设置值checkbox。

  Private Sub CheckBox03_Click() If CheckBox03.Value = True Then If CheckBox02.Value = False Then If MsgBox("The previous hour has not yet been completed. Continue?", vbYesNo, "User Input") = vbNo Then CheckBox02_Click(); // click specify buttion procedure Exit Sub Else End If Else End If Call errorCheck(sht1.CheckBox03, sht1.ComboBox03) End If 

或者在其他情况下使用Application.OnTime方法在需要的时间点击te buttione – 例如。 每隔一小时。