VBA工作表更改事件

我正在尝试使用Excel VBA中的工作表更改事件，但似乎不起作用。

从我所收集的内容中，只需定义处理函数“Worksheet_Change”就足够了，就像我在这里所做的那样：

Private Sub Worksheet_Change(ByVal Target As Range) Range("J1").Select If Target.Address = "$J$1" And ActiveCell.Value = 1 Then Range("B1").Select Dim c As Integer c = ActiveCell.Value c = c + 1 ActiveCell.Value = c End If End Sub 

问题是，我不确定我应该在哪里定义它。 我刚刚把它放在“module1”，这是我做第一个macros时自动生成的。 它是否正确？ 我对VBA很新，所以我对它还不太了解。

Answer 1

你需要把它放在它适用的表格中。 换句话说，如果要在Sheet1上捕获更改事件，则在VBA编辑器中，需要将其置于VBAProject（Book_Name）> Microsoft Excel Objects> Sheet1中。