Protected sheet and pivot tables

[MartinL]

Apologies for raising this old chestnut but I have not been able to find a workable solution from any of the threads here.

I have a protected sheet (no password) with a pivot table and some slicers on, along with some charts that I don't want messed up.

I have unchecked the LOCKED properties option on the slicers
I have nothing checked on the protect sheet properties (except the protect worksheet and contents of locked cells)

I have a piece of vba that says

Private Sub Worksheet_PivotTableChangeSync(ByVal Target As PivotTable)
ActiveSheet.Unprotect
Worksheets("Management Report").Columns("D:AA").AutoFit
ActiveSheet.Protect , UserInterfaceOnly:=True
End Sub

But I get "Cannot edit PivotTable on protected sheet"

stepping through shows that this error message displays happens before the vba is run.
I've tried all the Worksheet - Options ie Worksheet_SelectionChange etc but none have any effect on allowing the pivot table to change.

Is this even possible, then?

 

[MartinL]

SOLVED, A good nights sleep later....
The issue was that there was a check box missing on the worksheet option.
AllowUsingPivotTables:=True

so rewirite like this

Private Sub Worksheet_PivotTableChangeSync(ByVal Target As PivotTable)
ActiveSheet.Unprotect
Worksheets("Management Report").Columns("D:AA").AutoFit
ActiveSheet.Protect , UserInterfaceOnly:=True, AllowUsingPivotTables:=True
End Sub

and it works as expected