vba code for bex condition on/off

Hi,

is there any vba command or code, that I can use behind a button to activate and deactivate the bex condition?

I know I can do it with the filter in the ribbon, but I would like to define a button tha I can use in my workbook.

thanks

Cornelia