VBAワークシート変更イベント

Question

Excel VBAでワークシート変更イベントを使用しようとしていますが、動作していないようです。

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 

問題は、私は、私はそれを定義することになっています正確な場所を確認していないということです。私はここに行ったように私が集まるものと

は、それだけでハンドリング機能「Worksheet_Change」を定義するのに十分です。私はちょうど私が最初のマクロを作ったときに自動的に生成された "module1"に入れました。これは正しいです？私はVBAにはまだ初心者ですので、まだ分かりません。

Answer 1

あなたはそれが適用されるシートに入れる必要があります。つまり、VBAエディタでSheet1で変更イベントをキャプチャする場合は、VBAProject（Book_Name）> Microsoft Excelオブジェクト> Sheet1に配置する必要があります。