View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
MBlake[_2_] MBlake[_2_] is offline
external usenet poster
 
Posts: 35
Default Selection.AutoFilter Field:=1

Hi and thanks for the reply,
Unfortunately I tried FALSE earlier but that also fails,

Mickey


"PCLIVE" wrote in message
...
Couldn't you just use the opposite function from your Sub autofilter_off()
macro by changing it to "False"?

Sub autofilter_off()
With ActiveSheet
.EnableAutoFilter = False
End With
End Sub


Just a thought.
Paul

"MBlake" wrote in message
...
Hi,
I need to turn off the auto filter option and ensure any filtered columns
are returned to non-filter state prior to running some VBA, at present I
am using Selection.AutoFilter Field:=1 and repeating it for each of the
umpteen columns. This looks rather messy and adds a lot of lines to
code. I am sure it can be scaled down to one line, however so far I
haven't managed it. I have tried a few ideas to no avail -

I'd appreciate any advice on this one,
Best Wishes,
Mickey

-------------------------------------------------------------------------
Currently Using -
Selection.AutoFilter Field:=1
Selection.AutoFilter Field:=2
Selection.AutoFilter Field:=3
Selection.AutoFilter Field:=4 etc.
-------------------------------------------------------------------------
Have tried -

Sub Macro2()
'
Selection.AutoFilter Field:=1, Field:=2, Field:=3, Field:=4, Field:=5,
Field:=6
End Sub
--------------------------------------------------------------------------
Sub autofilter_off()
With ActiveSheet
.EnableAutoFilter = True
End With
End Sub
-------------------------------------------------------------------------