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）＆gt;中。 Microsoft Excel对象＆gt; Sheet 1中。