在工作表的两个单元格中跟踪旧值和新值

Question

我需要帮助跟踪工作表的两个单元格中的旧值和新值。

例如，单元格A10有一个Y/N开关，单元格B10有一个公式输出值。

如果A10="Y"和单元格B10已经更改，那么我将触发一个名为Ballooning的宏。

如果A10="N"和B10已更改，则不会有任何操作。

如果我再次更改A10="Y"，即使B10没有更改，宏Ballooning也必须触发。但是，任何其他工作表或工作簿更改都不应触发Ballooning宏。

Answer 1

在工作表后面的代码中尝试这样做：

Private Sub Worksheet_Change(ByVal Target As Range)
    'Check if Cell B10 in current sheet changed and A10 is Y
    If Range(Target.Address) = Range("B10") And Range("A10").Value = "Y" Then
        Call Ballooning
    End If

    'Check if A10 changed to Y
    If Range(Target.Address) = Range("A10") And Range("A10").Value = "Y" Then
        Call Ballooning
    End If
End Sub

​

​