ItalianPlatinum
Well-known Member
- Joined
- Mar 23, 2017
- Messages
- 733
- Office Version
- 2021
- 2019
- 2016
- 2010
- 2007
- Platform
- Windows
Hello - Having a roadblock on filtering using VBA. I have a simple dataset where I need two columns criteria to be met. The issue i am having is. if level date is 2 but the level date is NOT 8/24 i want it to show but my filter is filtering it out. How can I get the filtering to be smart enough to say if both are met to filter it out, but only if both are met. My table below starts on row 5.
Sub TEST2()
If Not ActiveSheet.AutoFilterMode Then ActiveSheet.Range("10:10").AutoFilter
Range("7:7").AutoFilter Field:=7, Criteria1:="AA", Operator:=xlOr, Criteria2:="DD"
Range("7:7").AutoFilter Field:=5, Criteria1:="<>2", Operator:=xlOr, Criteria2:="*<>2*"
Range("7:7").AutoFilter Field:=3, Criteria1:="<>" & Range("D6")
Range("7:7").AutoFilter Field:=3, Criteria1:="<>" & Range("D5")
End Sub
20200824 | 8/24/2020 | |||||
24-Aug-20 | ||||||
Desc 1 | Desc 2 | Date 1 | Date 2 | Level | Level Date | indicator |
1 | A | 20200823 | 20200823 | 0 | 0 | AA |
2 | B | 20200823 | 0 | 0 | 0 | BB |
3 | C | 20200823 | 0 | 0 | 0 | BB |
4 | D | 20200823 | 20200823 | 1 | 23-Aug-20 | CC |
5 | E | 20200823 | 20200823 | 1 | 24-Aug-20 | CC |
6 | F | 20200823 | 20200823 | 2 | 23-Aug-20 | DD |
7 | G | 20200823 | 20200823 | 1 | 24-Aug-20 | DD |
Sub TEST2()
If Not ActiveSheet.AutoFilterMode Then ActiveSheet.Range("10:10").AutoFilter
Range("7:7").AutoFilter Field:=7, Criteria1:="AA", Operator:=xlOr, Criteria2:="DD"
Range("7:7").AutoFilter Field:=5, Criteria1:="<>2", Operator:=xlOr, Criteria2:="*<>2*"
Range("7:7").AutoFilter Field:=3, Criteria1:="<>" & Range("D6")
Range("7:7").AutoFilter Field:=3, Criteria1:="<>" & Range("D5")
End Sub