diggerdidoodar
Board Regular
- Joined
- May 20, 2002
- Messages
- 59
Is it possible to have more than 2 results from 1 autofilter drop down arrow. Pls look at the following code to assist my problem:-
Dim My_Filter1 As Variant
Dim My_Filter2 As Variant
Dim My_Filter3 As Variant
Sheets("Data").Select
Rows("1").Select
Selection.AutoFilter
Selection.AutoFilter
Sheets("Header").Select
'My_Filter1 = InputBox("ENTER Clock N0., ie 50001", "DATA ENTRY")
'Sheets("Data").Select
'Selection.AutoFilter Field:=1, Criteria1:=My_Filter, Operator:= _
xlAnd
My_Filter1 = InputBox("ENTER Clock N0., ie 50001", "DATA ENTRY")
My_Filter2 = InputBox("ENTER Clock N0., ie 50005", "DATA ENTRY")
'My_Filter3 = InputBox("ENTER Clock N0., ie 50013", "DATA ENTRY")
Sheets("Data").Select
Selection.AutoFilter Field:=1, Criteria1:=My_Filter1, Operator:= _
xlOr, Criteria2:=My_Filter2
End Sub
Dim My_Filter1 As Variant
Dim My_Filter2 As Variant
Dim My_Filter3 As Variant
Sheets("Data").Select
Rows("1").Select
Selection.AutoFilter
Selection.AutoFilter
Sheets("Header").Select
'My_Filter1 = InputBox("ENTER Clock N0., ie 50001", "DATA ENTRY")
'Sheets("Data").Select
'Selection.AutoFilter Field:=1, Criteria1:=My_Filter, Operator:= _
xlAnd
My_Filter1 = InputBox("ENTER Clock N0., ie 50001", "DATA ENTRY")
My_Filter2 = InputBox("ENTER Clock N0., ie 50005", "DATA ENTRY")
'My_Filter3 = InputBox("ENTER Clock N0., ie 50013", "DATA ENTRY")
Sheets("Data").Select
Selection.AutoFilter Field:=1, Criteria1:=My_Filter1, Operator:= _
xlOr, Criteria2:=My_Filter2
End Sub