Worksheet change event not firing other Sub()

[sujittalukde]

I am using the following sub, which is running well if run directly:

Sub PickTaxData()
'code is doing the work
End Sub

Now I want this code to fire when the Cell $Y$6 od sheet 1 is changed.
So in sheet 1 code in Worksheet chage event I wrote a macro:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$Y$6" Then
Exit Sub
End If
If Target.Address = "$Y$6" Then
Call PickTaxData
End If
End Sub

Now when I am changing Cell Y6 of sheet 1, the Sub PickTaxData () is not firing.

Can Someone please help to fix the problem?

regards

 

[VoG]

That could be simplified

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$Y$6" Then Call PickTaxData
End Sub

Make sure that events are enabled. in the code window press CTRL + G to open the Immediate window, type

Application.EnableEvents=True

and press Enter. Then try changing Y6.

 

[sujittalukde]

Thank you VOG,

But still the code is not firing.

 

[VoG]

Try this

Private Sub Worksheet_Change(ByVal Target As Range)
MsgBox "Code Triggered"
If Target.Address = "$Y$6" Then Call PickTaxData
End Sub

Do you get a message? Try a MsgBox in your sub as well.

 

[sujittalukde]

Since I am signing off from office for today I will try on Monday and then come back.
Thank you.