I have a sheet called "Orders". I am using a macro to print out results of a various lists returned by an auto filter located in column B. Actually, the macro selects the first choice, "Driver 1", and prints the resulted list. Then the macro selects the second criteria "Driver 2" and prints out the new resulted list. And then I need the macro to select the "Custom choice" proposed by the auto filter menu. The custom criteria should be Column H >0.
How to formulate that condition in my exisiting macro below?
Sheets("Orders").Select
Selection.AutoFilter Field:=2, Criteria1:="Driver 1"
ActiveWindow.SelectedSheets.printout From:=1, To:=1, Copies:=1, Collate _
:=True
Selection.AutoFilter Field:=2, Criteria1:="Driver 2"
ActiveWindow.SelectedSheets.printout From:=1, To:=1, Copies:=1, Collate _
:=True
Selection.AutoFilter Field:=2, Criteria1:=???????????
ActiveWindow.SelectedSheets.printout From:=1, To:=1, Copies:=1, Collate _
:=True
End Sub
How to formulate that condition in my exisiting macro below?
Sheets("Orders").Select
Selection.AutoFilter Field:=2, Criteria1:="Driver 1"
ActiveWindow.SelectedSheets.printout From:=1, To:=1, Copies:=1, Collate _
:=True
Selection.AutoFilter Field:=2, Criteria1:="Driver 2"
ActiveWindow.SelectedSheets.printout From:=1, To:=1, Copies:=1, Collate _
:=True
Selection.AutoFilter Field:=2, Criteria1:=???????????
ActiveWindow.SelectedSheets.printout From:=1, To:=1, Copies:=1, Collate _
:=True
End Sub