根据另一列中的单元格值验证一列中的单元格值

Question

我想验证Excel中的三列。

1. 如果我在一列中提供值，而其余两列将其保留为空，则对于其余两列应抛出错误。
2. 如果我们将三列留空，则不应引发任何错误

这是我的代码：

rowToValidate = ActiveCell.Row

colToValidate = ActiveCell.Column + 1

Dim celAdd As String
celAdd = rowToValidate + colToValidate

Answer 1

做到这一点的方法不同，但这是一种方法，假设各列是并排的。 您可以根据需要调整Offset 。

Sub Test()
    If Not IsEmpty(ActiveCell.Value) And _
           IsEmpty(ActiveCell.Offset(, 1).Value) And _
           IsEmpty(ActiveCell.Offset(, 2).Value) Then
        ' Do whatever you wanted to do
    End If
End Sub