How can I set the code to become an Auto Filter instead of creating a command button?

Question

I would like to convert this code into an autofilter instead of having a command button. Any help is appreciated, thank you!

Private Sub CommandButton1_Click()

D