Add Code when new data is added

[helpexcel]

I'm using the following code on my worksheet page and want to know how I can expand this so that if I insert data in row 2 it will add another line as shown.

If Target.Address = "$A$1" Then
Call Ghostbusters
End If

Add this:

If Target.Address = "$B$1" Then
Call Ghostbusters
End If

 

[dave3009]

Hi, try something like this

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("A1:B1")) Is Nothing Then
    Call Ghostbusters
End If
End Sub

 

[helpexcel]

Sorry i meant that the data would be added to row 2. I updated the code to reflect this, but i think it is now preventing me from using the code that adds a row. Is there a way to say Range (A1:LR)
and the define LR. So that it would look and A1 and then count every row under that, that has a value in A

 

[dave3009]

Private Sub Worksheet_Change(ByVal Target As Range)
Dim lstRow As Long
lstRow = Range("A" & Rows.Count).End(xlUp).Row
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("A1:A" & lstRow)) Is Nothing Then
    Call Ghostbusters
End If
End Sub

OR

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("A:A")) Is Nothing Then
    Call Ghostbusters
End If
End Sub