Thread: Change Filter
View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
JohnUK JohnUK is offline
external usenet poster
 
Posts: 173
Default Change Filter

Hello Tom
Ha - something as simple as that eh?
Many thanks - again
Best Wishes
Regards
John

"Tom Ogilvy" wrote:

Try this

Number = Range("num_1").Value
Selection.AutoFilter Field:=5, Criteria1:=Number

--
Regards,
Tom Ogilvy

"JohnUK" wrote:

Hi,
I have been trying to get a filter to change depending on a number in a range.
Reason:
My worksheet has data that contains numbers from 60 to 70 in one of the
columns (Filtered) and If I was to enter 65 say, into my range (num_1) I then
want the macro to filter on 65.

My poor attempt showing what I think is the key part of the code

Number = Range("num_1").Value
Selection.AutoFilter Field:=5, Criteria1:=" & Number & "

For some reason it filters on CUSTOM

Any help greatly Appreciated
John