当一个单元格的值与Excel中不同列中的相邻单元格的值不匹配时,我试图发出警报。
例如,只有当B列的相邻单元格具有值“ Available”时,才可以将值“ Complete”填充到A列的单元格中。
因此,我希望在“完全”填充到A列的单元格但B列的单元格没有值“可用”时弹出警报。
有人可以分享我的想法吗?有用的链接/示例VBA代码等。
答案 0 :(得分:0)
您可以修改以下代码,将其导入工作表更改事件并尝试:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A:A")) Is Nothing Then '<- If column A change
If Target.Value = "Complete" And Target.Offset(0, 1).Value <> "Available" Then
MsgBox "Please review records."
End If
End If
End Sub