I have this VBA Code:
I am running out of space in the first sheet and would like to continue on Sheet 2. I would like to see filtered data on Sheet 1.
Or maybe everything filtered on Sheet 3.
Thanks.
Code:
Sub RefreshFilter()
'
' RefreshFilter Macro
'
' Keyboard Shortcut: Ctrl+q
'
Range("A1").Select
Range("A1:I1019277").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange _
:=Range("A1:I3"), Unique:=False
End Sub
Sub ClearSearch()
'
' ClearSearch Macro
'
' Keyboard Shortcut: Ctrl+w
'
ActiveSheet.ShowAllData
Range("L5").Select
Selection.ClearContents
Range("L1").Select
Selection.ClearContents
End Sub
Or maybe everything filtered on Sheet 3.
Thanks.