Hi,
I'm stuck. I want to do the following
For Sub Clear_advance_filter()
1. Clear range called "Clear_Area" which is A5 to L9.
2. Then insert "-" in range called "Clear" which is A5 to A9
3. Check to see if ActiveSheet.ShowAllData = False. If true exit su
(filter not on and if False then Show all.
For Sub Advance_Filter_master ()
1. If range Clear_Area A5 to L9 has text then delete Clear A5 to A9
----------------------------------------------------
'this Clears range
Range("Clear").ClearContents
'selects A3 and inserts the -
'This shows all
ActiveSheet.ShowAllData
' go home
Range("A1").Select
End Sub
---------------------------------------------------
Sub Advance_Filter_master()
Range("filter_range_master").AdvancedFilte
Action:=xlFilterInPlace, CriteriaRange:= _
Range("Criteria_m"), Unique:=False
End Sub
-----------------------------------------------------
Thanks in advance
VBA Noo
--
VBA Noo
-----------------------------------------------------------------------
VBA Noob's Profile:
http://www.excelforum.com/member.php...fo&userid=3383
View this thread:
http://www.excelforum.com/showthread.php?threadid=56330