VBA工作表更改事件

Question

我试图在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”中，当我制作第一个宏时，它会自动生成。它是否正确？我对VBA很新，所以我对它还不太了解。

Answer 1

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