Cell Change Macro

[ManUBlueJay]

Is there a way to have the worksheets change method monitor 2 cells and depending which one changes run code. Here is what I did but cannot seem to have the code run past the first if.

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("B1")) Is Nothing Then
Range("A7") = "B1"
Else
If Not Intersect(Target, Range("B2")) Is Nothing Then
Range("A7") = "B2"

End If
End If

End Sub

 

[James006]

Hello,

If you are looking for what caused the Pivot Table to update ...and the PivotTableChangeSync event ...

see link : http://dailydoseofexcel.com/archives/2014/07/07/what-caused-that-pivottableupdate-part-one/

Hope this will help