Command Button to select from Autofilter

[Dr_Mik]

Hi, I am struggling to work out why the following doesn't work:

Private Sub CommandButton2_Click()
Sheets("Sheet1").Select
Range("f5").AutoFilter Field:=6, Criteria1:="Budget"
End Sub

As when I use a simple Macro to perform the same task (filter on "Budget") it works perfectly fine. As a Macro it looks like this:

Sub Macro_1()

Sheets("Sheet1").Select
Range("f5").AutoFilter Field:=6, Criteria1:="Budget"
End Sub

Can anyone suggest a solution or reason? As all I need is a Command Button to select from the Autofilter

Cheers

[davesexcel]

That's a good one,

How does it not work??

[Leith Ross]

Hello Dr_Mik,

I am guessing from your code the Command Button is on a UserForm. If so you need to set the UserForm's ShowModal propertry to False.

Sincerely,
Leith Ross