When cell changes, execute code

**kirkland** · 02-15-2012, 04:59 AM

Hi,
Pretty much when cell J26 changes (it is linked to another cell), I want it to execute [Sub MRP_trickledown].
I did some searching but wasn't completely sure on how to use this

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("J26")) Is Nothing Then
 
[copy/pasted sub MRP_trickledown] 
    
    
End If

Also, does it matter where I put the private sub?

**vin1** · 02-15-2012, 05:06 AM

you should put the private sub event in its worksheet where the J26 cell need to be changed

**tom1977** · 02-15-2012, 05:12 AM

try this

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("J26")) Is Nothing Then
 
call MRP_trickledown
    
    
End If
End Sub

**kirkland** · 02-15-2012, 05:29 AM

^I've tried that and nothing seems to be happening. I've even tried putting

msgbox "helloworld"

instead of my code and nothing

Is the location of the Private Sub Worksheet_Change(ByVal Target As Range) important?
Also, the sheet that J26 is called "Phase II" does that change anything?

**tom1977** · 02-15-2012, 06:48 AM

Of course the place of code is important You should have it in sheet's module (mark the name of sheet and clik right key of mouse and choose "view code" and there place it) and the name of sheet has nothing to do with working of this code

**kirkland** · 02-15-2012, 09:06 AM

Ahhh, I put it in the same sheet, but that wasn't the issue. It wasn't recognizing when the cell was changing (I had it linked to another equation, and when the equation changed, it wouldn't execute my function).

but I found a way around it now. thank you so much!