由单元格更改触发的事件

我有一个validation框,其中存储了一些销售渠道,如“SME100”,“间接”等…

现在我有一个自动过滤系统设置,但我想创build一个事件,说:“当单元格”B2“更改,然后激活”Auto_Filter“”。

这是我目前有的。 它不会返回错误消息,但是当我在前端testing它时,它也不会运行macros。

Private Sub CellChangeFilter() Dim Tariff_Selection As String Set Tariff_Selection = Cell("B1") If Tariff_Selection = "" Then Auto_Filter End Sub 

正如你所看到的,我已经为特定的单元创build了一个variables,我希望这个事件可以被监控。

如上所述,Worksheet_Change是你想要的。 尝试这个:-

 Private Sub Worksheet_Change(ByVal Target As Range) If (Target.Address = Range("B2").Address) Then Debug.Print "Cell B2 was edited in some way" Auto_Filter End If End Sub