excel - VBA 更改值，调用宏。忽视

Question

你好堆栈溢出社区!我是 VBA 脚本的主要菜鸟，并认为我有一个简单的问题？我的工作表上有一些简单的代码，每次在特定单元格中更改值时都会调用一个函数。

问题是，该单元格是一个下拉菜单，当您将下拉菜单的选择更改为相同的值时，它仍然运行代码..

需要明确的是，我希望代码在下拉列表更改时运行。只是不是当它“更改”为相同的值时。在下面粘贴我的代码。让我知道您是否可以提供帮助!

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$W$21" Then
        Call Financing
    End If
End Sub

我在想也许可以添加一个 .ignore 或其他东西？

Answer 1

保持前一个值的静态值并在启动融资子程序之前进行比较。

Private Sub Worksheet_Change(ByVal Target As Range)
    static oldW1  as variant
    If Target.Address = "$W$21" Then
        if target.value <> oldW1 then
            oldW1 = Target.value
            Call Financing
        end if
    End If
End Sub

静态变量被声明它们的子过程或函数“记住”。通常，当 Worksheet_Change 完成并退出时，oldW1 将被“忘记”(并被破坏)。但是，对于静态 oldW1，第二次(以及所有后续时间)输入 Worksheet_Change，它会“记住”最后一次使用 oldW1 的值。

这并不意味着静态变量是全局公开的；它仅在声明它的函数或子过程中可用。