Event Procedure tied to a specific cell not working

[SJ-NY]

Hi
I know this had been asked, I want an event procedure to run only when a specific cell is change, such as "A3". I searched the board and modified some code that I found. I have been using the following code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)<?xml:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" /><o></o>
Dim Myrng As Range<o></o>
set Myrng = Target.parent.Range("b3")<o></o>
Range("b10").Value = "Go"<o></o>
End Sub<o></o>
i expecpted the procedure to run only when the value is "A3" is changed. The procedure runs when any cell is entered. When I delete the value in "B10" it runs again.

What did I miss.

Thanks

Steve

 

[CharlesChuckieCharles]

Try

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("B3")) Is Nothing Then
    Target.Parent.Range("B10").Value = "Go"
End If
 
End Sub

 

[SJ-NY]

Thank you, this should do the trick

 

[SJ-NY]

Hi
i just tried the macro, it is executing everytime the cell B3 is selected, not when the value is changed. is there additional code required to execute the procedure only after the value in in "B3" is changes?

Thanks

 

[CharlesChuckieCharles]

move the code to

Private Sub Worksheet_Change(ByVal Target As Range)

works as long as the ceel isn't updated by a formula

 

[SJ-NY]

Hi
That fixed it, changing it from "selection change" to "change" was the answer.

Thanks

Steve