动态/自定义消息，在单元格中输入的值

Question

有什么方法可以显示带有单元格中输入值的数据验证消息。

示例：一个被限制输入 5 到 10 之间的值的单元格，如果我输入的值为 11，它应该显示消息说"11 不属于单元格限制值"。

我知道我们可以输入自定义消息（单元格>数据>数据验证>错误警报），但我希望消息显示当前输入的值以及我的自定义消息，而不仅仅是通用消息。而且，如果可能的话，我想将来将该特定行的任何其他现有列值与错误消息连接起来。

因此，任何人都可以就以下问题向我提供建议：

1. 如何在消息中显示单元格输入的值
2. 以及该特定行的不同列的另一个单元格值。

谢谢！

Answer 1

如果不使用数据验证，此代码将检查您定义的范围内的更改。然后将该范围内已更改单元格的值与您设置的条件（在本例中介于 5 和 10 之间）进行比较。

让我知道这是否适合您的需要：

（复制并粘贴到需要此验证的工作表上）

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Me.Range("B2:B10")) Is Nothing Then 'Change the range as you need
        If Target = "" Then Exit Sub 'If the value is deleted, do nothing
        If Target < 5 Or Target > 10 Then 'Validation condition(s)
            MsgBox Target & " does not come under cell restriction value" 'The message will show the value in the changed cell (Target)
            Target = "" 'Delete the not valid value
        End If
    End If
End Sub

您还可以在同一代码

表中使用以下代码来获取更改单元格的行，并在同一行和不同列中查找另一个值：

Me.Range("A" & Target.Row)