Work change event

[Perksy_no1]

Hi There,

I was wondering if it possible to have a work sheet change event on a pivot table but only relelvent when changing a certain field?

I've tried the following piece of code but it doesnt seem to work

    If Target.Address(False, False) = "B2" Then
        
        Application.ScreenUpdating = False
        Application.StatusBar = "Getting latest order data"
        Application.Calculation = xlCalculationManual
        ActiveSheet.PivotTables("PivotTable20").PivotFields("Req Period Current Month").ClearAllFilters
        Application.Calculation = xlCalculationAutomatic
        Application.ScreenUpdating = True
        Application.StatusBar = False
        
    End If

Thanks in advance for any help you can offer

Mark

 

[RoryA]

Is that the field in B2?

 

[Perksy_no1]

I've just noticed that! Doh! I've now changed the target cell to B1 and its still not letting me amend that field