Trigger code when I calc

If I have a sheet the I ONLY manually calc, how can I get some code to run right after I do a Shift+Calc? I have a very long matrix that is filtered. I'd like to refresh the filter after I calc. I have the code to refresh the filter. It runs every time I select the sheet but I'd also like to run it every time I calc.

Thanks for your help.
RR

What I'm looking for is this. The code below (I think) refreshes the filter in B25 every time I move to this sheet. If, however, I manually calculate and do not move off this sheet, the filter need refreshing. I was hoping to get some code that ran the filter refresh below every time I recalculate this sheet instead of when I select this page.

Private Sub Worksheet_Activate()
Application.ScreenUpdating = False


' Refreshes that Filter in Col A so that all rows show
ActiveSheet.Range("$B$25:$W$6046").AutoFilter Field:=1

' Refreshes that Filter in Col A so that JUST the Zeros show and not the 1's which represent blank output
ActiveSheet.Range("$B$25:$W$6046").AutoFilter Field:=1, Criteria1:="-"

Application.ScreenUpdating = True
Range("A1").Select
End Sub

Do that by doing this?

Replace Private Sub Worksheet_Activate()

With this Private Sub Worksheet_Calculate()

And if I do that, every time I calculate, it runs the refresh code?

Outstanding!!!

Thanks for your help.
Have a great day in "The Great City of Manchester" from The Great State of Texas