If this is part of the Worksheet PivotTableUpdate event for Sheet1, it should run when you refresh data in the pivot table. A quick way to check would be to add a msgbox at the top of the procedure to test that it's being triggered. If you still can't get it working, attached your updated sample file.