警告空单元格的用户，并根据前一列中的值指示位置

我是VBA新手。 我有一个我认为很简单的问题，但是我是愚蠢的。 我必须生成一个MsgBox警告用户input空白单元格中的数据。

我还必须通过指出前一列中的参数来提及空白单元格的目的地。 其实我的excel列表非常大，但是，我上传的图片显示了我的需求。

在列AI中已经input了公司的名字 – 法拉利，奥迪和兰博基尼，而在列BI中提到了他们各自的汽车。 在C，D，EI提到了他们的月销量数字。 如果用户没有input一个条目的销售数字，我们需要在检查数据有效性时提醒他。

这个图片的信息应该是： 请input售出的兰博基尼Aventador和兰博基尼Veneno的单位数量。

在我的图像中，黄色突出显示未input数据。 在我的文件中，我只有一列（只有一个月）的销售，但成千上万的行（汽车）。

Answer 1

假设你的数据看起来像这样

尝试这个

 Private Sub CommandButton1_Click() Dim ws As Worksheet Dim lrow As Long, i As Long Set ws = ThisWorkbook.Sheets("Sheet3") With ws lrow = .Range("A" & .Rows.Count).End(xlUp).Row For i = 4 To lrow If Application.WorksheetFunction.CountA(.Range("C" & i & ":E" & i)) <> 3 Then MsgBox "Please Enter the number of units of " & .Range("B" & i).Value & " Sold" Exit Sub End If Next i End With MsgBox "Data Validated" End Sub 

这是你运行代码时得到的结果

这一切都充满了