mình muốn lọc AutoFilter Field 3 và 4 ở cùng 1 CheckBox thì code như thế nào hả mọi người, giúp mình gộp lại đoạn code này với.
Private Sub CheckBox1_Change()
If CheckBox1.Value = True Then
Range("$A$
2:$E$
17").AutoFilter Field:=3, Criteria1:=">=0", Operator:=xlAnd
Else
Range("$A$
2:$E$
17").AutoFilter Field:=4
End If
End Sub
Private Sub CheckBox1_Change()
If CheckBox1.Value = True Then
Range("$A$
2:$E$
17").AutoFilter Field:=4, Criteria1:=">=20", Criteria2:="<=30", Operator:=xlAnd
Else
Range("$A$
2:$E$
17").AutoFilter Field:=4
End If
End Sub